mirror_bdy_3d() - mirrors 3d vaiables (Source File: mirror_bdy_3d.F90)

INTERFACE:

    subroutine mirror_bdy_3d(f,tag)

DESCRIPTION:

Some variables are mirrored outside the calculation domain in the vicinity of the open boundaries. This is to avoid if statements when calculating e.g. the Coriolis terms and advection. This routines mirrors 3d variables. USES:

    use halo_zones, only : U_TAG,V_TAG,H_TAG,D_TAG
    use domain, only: imin,imax,jmin,jmax,kmax
    use domain, only: az,au,av
    use domain, only: NWB,NNB,NEB,NSB
    use domain, only: wi,wfj,wlj,nj,nfi,nli,ei,efj,elj,sj,sfi,sli
    IMPLICIT NONE

INPUT PARAMETERS:

    integer, intent(in)                 :: tag

INPUT/OUTPUT PARAMETERS:

    REALTYPE, intent(inout)             :: f(I3DFIELD)

OUTPUT PARAMETERS:

REVISION HISTORY:

    Original author(s): Karsten Bolding & Hans Burchard

LOCAL VARIABLES:

    integer                   :: i,j,n