| File |
Line number |
Procedure |
Code |
|
./model/src/thermodynamics.F |
310 |
THERMODYNAMICS |
I GAD_TEMPERATURE, |
|
./model/src/thermodynamics.F |
540 |
THERMODYNAMICS |
I GAD_TEMPERATURE, useGMredi, useKPP, |
|
./model/src/thermodynamics.F |
547 |
THERMODYNAMICS |
I tempImplVertAdv, tempAdvScheme, GAD_TEMPERATURE, |
|
./model/src/thermodynamics.F |
561 |
THERMODYNAMICS |
I GAD_TEMPERATURE, kappaRk, recip_hFacC, |
|
./model/src/calc_3d_diffusivity.F |
151 |
CALC_3D_DIFFUSIVITY |
IF (trIdentity.EQ.GAD_TEMPERATURE) THEN |
|
./model/src/calc_3d_diffusivity.F |
70 |
CALC_3D_DIFFUSIVITY |
IF ( trIdentity.EQ.GAD_TEMPERATURE) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
475 |
GAD_CALC_RHS |
IF (tracerIdentity.EQ.GAD_TEMPERATURE) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
520 |
GAD_CALC_RHS |
& .AND. tracerIdentity.EQ.GAD_TEMPERATURE |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
192 |
GAD_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_TEMPERATURE ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
59 |
GAD_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_TEMPERATURE, myThid ) |
|
./pkg/generic_advdiff/GAD.h |
57 |
NO PROCEDURE |
INTEGER GAD_TEMPERATURE |
|
./pkg/generic_advdiff/GAD.h |
58 |
NO PROCEDURE |
PARAMETER(GAD_TEMPERATURE=1) |
|
./pkg/generic_advdiff/gad_advection.F |
434 |
GAD_ADVECTION |
IF (tracerIdentity.EQ.GAD_TEMPERATURE) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
571 |
GAD_ADVECTION |
IF (tracerIdentity.EQ.GAD_TEMPERATURE) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
616 |
GAD_ADVECTION |
& .AND. tracerIdentity.EQ.GAD_TEMPERATURE |
|
./model/src/calc_gt.F |
102 |
CALC_GT |
I GAD_TEMPERATURE, tempAdvScheme, tempVertAdvScheme, |