stop_macro - terminates the macro loop (Source File: stop_macro.F90)

INTERFACE:

    subroutine stop_macro
DESCRIPTION:

This routine should be called from m3d at the end of each macro time step in order to copy the vertically interated and temporally averaged transports to old values Uinto and Vinto, and to reinitialise the transports Uint and Vint to zero. USES:

    use variables_2d, only: Uint,Uinto,Vint,Vinto
    use getm_timers, only: tic, toc, TIM_STOPMCR
    IMPLICIT NONE
REVISION HISTORY:
    Original author(s): Hans Burchard & Karsten Bolding
LOCAL VARIABLES: