| 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 |
756 |
GAD_ADVECTION |
fVerT(i,j,kUp) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
775 |
GAD_ADVECTION |
fVerT(i,j,kUp) = 0. |
|
./pkg/generic_advdiff/gad_advection.F |
799 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
803 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
807 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
811 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
816 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
845 |
GAD_ADVECTION |
& *( fVerT(i,j,kDown)-fVerT(i,j,kUp) |
|
./pkg/generic_advdiff/gad_advection.F |
856 |
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 |
488 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + af(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
541 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
588 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
621 |
GAD_CALC_RHS |
& +MAX(0. _d 0,fVerT(i,j,kDown)*rkSign) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
622 |
GAD_CALC_RHS |
& +MAX(0. _d 0,-fVerT(i,j,kUp)*rkSign) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
640 |
GAD_CALC_RHS |
IF (-fVerT(i,j,kUp)*rkSign .GT.0. _d 0) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
641 |
GAD_CALC_RHS |
& fVerT(i,j,kUp)=fac*fVerT(i,j,kUp) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
643 |
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 |
665 |
GAD_CALC_RHS |
& *( -fVerT(i,j,kDown)*rkSign ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
667 |
GAD_CALC_RHS |
fVerT(i,j,kDown)=fac*fVerT(i,j,kDown) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
674 |
GAD_CALC_RHS |
& *( fVerT(i,j,kDown)*rkSign ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
692 |
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 |
158 |
CALC_GT |
U fVerT, gT, |
|
./model/src/calc_gt.F |
15 |
CALC_GT |
U fVerT, |
|
./model/src/calc_gt.F |
169 |
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 |
165 |
THERMODYNAMICS |
_RL fVerT (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./model/src/thermodynamics.F |
268 |
THERMODYNAMICS |
fVerT (i,j,1) = 0. _d 0 |
|
./model/src/thermodynamics.F |
269 |
THERMODYNAMICS |
fVerT (i,j,2) = 0. _d 0 |
|
./model/src/thermodynamics.F |
607 |
THERMODYNAMICS |
U fVerT, |