| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/GAD.h |
102 |
NO PROCEDURE |
INTEGER GAD_TR1 |
|
./pkg/generic_advdiff/GAD.h |
103 |
NO PROCEDURE |
PARAMETER(GAD_TR1=3) |
|
./pkg/generic_advdiff/gad_advection.F |
471 |
GAD_ADVECTION |
ELSEIF (tracerIdentity.GE.GAD_TR1) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
473 |
GAD_ADVECTION |
& tracerIdentity-GAD_TR1+1, localTij, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
640 |
GAD_ADVECTION |
ELSEIF (tracerIdentity.GE.GAD_TR1) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
642 |
GAD_ADVECTION |
& tracerIdentity-GAD_TR1+1, localTij, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
580 |
GAD_CALC_RHS |
ELSEIF (tracerIdentity .GE. GAD_TR1) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
583 |
GAD_CALC_RHS |
I tracerIdentity-GAD_TR1+1, |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
363 |
GAD_DIAGNOSTICS_INIT |
ELSEIF( tracerId.GE.GAD_TR1 |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
364 |
GAD_DIAGNOSTICS_INIT |
& .AND. tracerId.LT.GAD_TR1+PTRACERS_num ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
367 |
GAD_DIAGNOSTICS_INIT |
GAD_DIAG_SUFX = 'Tr'//PTRACERS_ioLabel( tracerId+1-GAD_TR1 ) |
|
./pkg/gmredi/gmredi_calc_diff.F |
57 |
GMREDI_CALC_DIFF |
IF (tracerIdentity .LT. GAD_TR1) THEN |
|
./pkg/gmredi/gmredi_calc_diff.F |
74 |
GMREDI_CALC_DIFF |
IF (tracerIdentity .LT. GAD_TR1) THEN |
|
./pkg/gmredi/gmredi_rtransport.F |
131 |
GMREDI_RTRANSPORT |
IF ( tracerIdentity .LT. GAD_TR1 ) THEN |
|
./model/src/calc_3d_diffusivity.F |
139 |
CALC_3D_DIFFUSIVITY |
ELSEIF ( trIdentity.GE.GAD_TR1) THEN |
|
./model/src/calc_3d_diffusivity.F |
141 |
CALC_3D_DIFFUSIVITY |
iTr = trIdentity - GAD_TR1 + 1 |
|
./model/src/calc_3d_diffusivity.F |
179 |
CALC_3D_DIFFUSIVITY |
ELSEIF ( trIdentity.GE.GAD_TR1) THEN |
|
./model/src/calc_3d_diffusivity.F |
187 |
CALC_3D_DIFFUSIVITY |
IF ( trIdentity.GE.GAD_TR1) THEN |
|
./model/src/calc_3d_diffusivity.F |
188 |
CALC_3D_DIFFUSIVITY |
iTr = trIdentity - GAD_TR1 + 1 |
|
./model/src/calc_3d_diffusivity.F |
89 |
CALC_3D_DIFFUSIVITY |
IF ( trIdentity .GE. GAD_TR1) THEN |
|
./pkg/ptracers/ptracers_advection.F |
114 |
PTRACERS_ADVECTION |
I GAD_TR1+iTracer-1, |
|
./pkg/ptracers/ptracers_advection.F |
95 |
PTRACERS_ADVECTION |
I GAD_TR1+iTracer-1, |
|
./pkg/ptracers/ptracers_calc_diff.F |
75 |
PTRACERS_CALC_DIFF |
trIdentity = iTr + GAD_TR1 - 1 |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
127 |
PTRACERS_DIAGNOSTICS_INIT |
tracerId = iTrc + GAD_TR1 - 1 |
|
./pkg/ptracers/ptracers_dwnslp_apply.F |
56 |
PTRACERS_DWNSLP_APPLY |
I GAD_TR1+iTr-1, bi, bj, kSurfC, |
|
./pkg/ptracers/ptracers_dwnslp_apply.F |
64 |
PTRACERS_DWNSLP_APPLY |
I GAD_TR1+iTr-1, bi, bj, kLowC, |
|
./pkg/ptracers/ptracers_implicit.F |
90 |
PTRACERS_IMPLICIT |
GAD_TR = GAD_TR1 + iTracer - 1 |
|
./pkg/ptracers/ptracers_integrate.F |
136 |
PTRACERS_INTEGRATE |
GAD_TR = GAD_TR1 + iTracer - 1 |
|
./model/src/impldiff.F |
88 |
IMPLDIFF |
IF ( tracerId.GE.GAD_TR1) THEN |