File |
Line number |
Procedure |
Code |
./pkg/exch2/exch2_check_depths.F |
12 |
EXCH2_CHECK_DEPTHS |
SUBROUTINE EXCH2_CHECK_DEPTHS( rLow, rHigh, myThid ) |
./pkg/exch2/exch2_check_depths.F |
41 |
EXCH2_CHECK_DEPTHS |
_RS rHigh(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/exch2/exch2_check_depths.F |
65 |
EXCH2_CHECK_DEPTHS |
tmpFld(0,j) = rHigh( 1 ,j,bi,bj) - rLow( 1 ,j,bi,bj) |
./pkg/exch2/exch2_check_depths.F |
66 |
EXCH2_CHECK_DEPTHS |
tmpFld(i,j) = rHigh(sNx,j,bi,bj) - rLow(sNx,j,bi,bj) |
./pkg/exch2/exch2_check_depths.F |
70 |
EXCH2_CHECK_DEPTHS |
tmpFld(i,0) = rHigh(i, 1 ,bi,bj) - rLow(i, 1 ,bi,bj) |
./pkg/exch2/exch2_check_depths.F |
71 |
EXCH2_CHECK_DEPTHS |
tmpFld(i,j) = rHigh(i,sNy,bi,bj) - rLow(i,sNy,bi,bj) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
114 |
GAD_U3C4_IMPL_R |
rHigh = (1. _d 0 -wCFL*wCFL)*oneSixth |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
116 |
GAD_U3C4_IMPL_R |
rUpwind2D(i,j) = (2. _d 0*rHigh )*ABS(rCenter) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
117 |
GAD_U3C4_IMPL_R |
rC4km2D (i,j) = rHigh * (rCenter+ABS(rCenter))*mskM |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
118 |
GAD_U3C4_IMPL_R |
rC4kp2D (i,j) = rHigh * (rCenter-ABS(rCenter))*mskP |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
146 |
GAD_U3C4_IMPL_R |
rHigh = (1. _d 0 -wCFL*wCFL)*oneSixth |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
148 |
GAD_U3C4_IMPL_R |
rUpwind= (2. _d 0*rHigh )*ABS(rCenter) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
149 |
GAD_U3C4_IMPL_R |
rC4km = rHigh * (rCenter+ABS(rCenter))*mskM |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
150 |
GAD_U3C4_IMPL_R |
rC4kp = rHigh * (rCenter-ABS(rCenter))*mskP |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
80 |
GAD_U3C4_IMPL_R |
_RL rC4km, rC4kp, rHigh |