init_advection

INTERFACE:

    subroutine init_advection()
DESCRIPTION:

Allocates memory and sets up masks and lateral grid increments. USES:

    use domain, only: az,au,av,ax
 #if defined(SPHERICAL) || defined(CURVILINEAR)
    use domain, only: dxc,dyc,arcd1,dxu,dyu,arud1,dxv,dyv,arvd1,dxx,dyx
 #endif
    IMPLICIT NONE
LOCAL VARIABLES:
    integer :: rc



kklingbe 2017-10-02