| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_advection.F |
137 |
GAD_ADVECTION |
_RL fVerT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/generic_advdiff/gad_advection.F |
210 |
GAD_ADVECTION |
fVerT(i,j,1) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_advection.F |
211 |
GAD_ADVECTION |
fVerT(i,j,2) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_advection.F |
744 |
GAD_ADVECTION |
fVerT(i,j,kUp) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
763 |
GAD_ADVECTION |
fVerT(i,j,kUp) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
787 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
791 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
795 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
799 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
804 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
833 |
GAD_ADVECTION |
& *( fVerT(i,j,kDown)-fVerT(i,j,kUp) |
|
./pkg/generic_advdiff/gad_advection.F |
844 |
GAD_ADVECTION |
CALL DIAGNOSTICS_FILL( fVerT(1-Olx,1-Oly,kUp), |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
116 |
GAD_CALC_RHS |
_RL fVerT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
149 |
GAD_CALC_RHS |
fVerT(1,1,kDown) = fVerT(1,1,kDown) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
168 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
19 |
GAD_CALC_RHS |
U fVerT, gTracer, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
494 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
547 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
594 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
627 |
GAD_CALC_RHS |
& +MAX(0. _d 0,fVerT(i,j,kDown)*rkSign) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
628 |
GAD_CALC_RHS |
& +MAX(0. _d 0,-fVerT(i,j,kUp)*rkSign) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
646 |
GAD_CALC_RHS |
IF (-fVerT(i,j,kUp)*rkSign .GT.0. _d 0) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
647 |
GAD_CALC_RHS |
& fVerT(i,j,kUp)=fac*fVerT(i,j,kUp) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
649 |
GAD_CALC_RHS |
IF (k.LT.Nr .AND. fVerT(i,j,kDown)*rkSign.GT.0. _d 0) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
671 |
GAD_CALC_RHS |
& *( -fVerT(i,j,kDown)*rkSign ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
673 |
GAD_CALC_RHS |
fVerT(i,j,kDown)=fac*fVerT(i,j,kDown) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
680 |
GAD_CALC_RHS |
& *( fVerT(i,j,kDown)*rkSign ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
698 |
GAD_CALC_RHS |
& +(fVerT(i,j,kDown)-fVerT(i,j,kUp))*rkSign |
|
./model/src/calc_gt.F |
129 |
CALC_GT |
fVerT(1,1,kDown) = fVerT(1,1,kDown) |
|
./model/src/calc_gt.F |
15 |
CALC_GT |
U fVerT, |
|
./model/src/calc_gt.F |
170 |
CALC_GT |
U fVerT, gT, |
|
./model/src/calc_gt.F |
181 |
CALC_GT |
U fVerT, gT, |
|
./model/src/calc_gt.F |
98 |
CALC_GT |
_RL fVerT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/smooth/smooth_rhs.F |
318 |
SMOOTH_RHS |
fVerT(i,j,k-1,bi,bj) = fVerT(i,j,k-1,bi,bj) + |
|
./pkg/smooth/smooth_rhs.F |
337 |
SMOOTH_RHS |
_EXCH_XYZ_RL ( fVerT, myThid ) |
|
./pkg/smooth/smooth_rhs.F |
350 |
SMOOTH_RHS |
& +(fVerT(i,j,k,bi,bj)-fVerT(i,j,k-1,bi,bj))*rkSign |
|
./pkg/smooth/smooth_rhs.F |
361 |
SMOOTH_RHS |
& +(fVerT(i,j,k,bi,bj))*rkSign |
|
./pkg/smooth/smooth_rhs.F |
67 |
SMOOTH_RHS |
_RL fVerT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nR,nSx,nSy) |
|
./pkg/smooth/smooth_rhs.F |
82 |
SMOOTH_RHS |
fVerT(i,j,k,bi,bj) = 0. _d 0 |
|
./model/src/thermodynamics.F |
168 |
THERMODYNAMICS |
_RL fVerT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./model/src/thermodynamics.F |
270 |
THERMODYNAMICS |
fVerT (i,j,1) = 0. _d 0 |
|
./model/src/thermodynamics.F |
271 |
THERMODYNAMICS |
fVerT (i,j,2) = 0. _d 0 |
|
./model/src/thermodynamics.F |
629 |
THERMODYNAMICS |
U fVerT, |