INTERFACE:
subroutine mirror_bdy_2d(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 2d variables. USES:
use halo_zones, only : U_TAG,V_TAG,H_TAG use domain, only: imin,imax,jmin,jmax 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 NONEINPUT PARAMETERS:
integer, intent(in) :: tagINPUT/OUTPUT PARAMETERS:
REALTYPE, intent(inout) :: f(E2DFIELD)OUTPUT PARAMETERS:
REVISION HISTORY:
Original author(s): Karsten Bolding & Hans BurchardLOCAL VARIABLES:
integer :: i,j,n