| File |
Line number |
Procedure |
Code |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
123 |
PTRACERS_DIAGNOSTICS_INIT |
tracerId = iTrc + GAD_TR1 - 1 |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
124 |
PTRACERS_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
41 |
PTRACERS_DIAGNOSTICS_INIT |
INTEGER iTrc, ilnb, tracerId |
|
./model/src/impldiff.F |
11 |
IMPLDIFF |
I tracerId, KappaRX, recip_hFac, |
|
./model/src/impldiff.F |
214 |
IMPLDIFF |
IF ( useDiagnostics .AND.tracerId.NE.0 ) THEN |
|
./model/src/impldiff.F |
215 |
IMPLDIFF |
IF ( tracerId.GE. 1 ) THEN |
|
./model/src/impldiff.F |
218 |
IMPLDIFF |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./model/src/impldiff.F |
223 |
IMPLDIFF |
ELSEIF ( tracerId.EQ. -1 ) THEN |
|
./model/src/impldiff.F |
225 |
IMPLDIFF |
ELSEIF ( tracerId.EQ. -2 ) THEN |
|
./model/src/impldiff.F |
240 |
IMPLDIFF |
ELSEIF ( tracerId.GE.1 ) THEN |
|
./model/src/impldiff.F |
249 |
IMPLDIFF |
ELSEIF ( tracerId.EQ.-1 ) THEN |
|
./model/src/impldiff.F |
260 |
IMPLDIFF |
ELSEIF ( tracerId.EQ.-2 ) THEN |
|
./model/src/impldiff.F |
43 |
IMPLDIFF |
INTEGER tracerId |
|
./model/src/impldiff.F |
77 |
IMPLDIFF |
IF ( tracerId.GE.1 ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
179 |
GAD_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
196 |
GAD_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
203 |
GAD_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_TEMPERATURE ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
205 |
GAD_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SALINITY ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
207 |
GAD_DIAGNOSTICS_INIT |
ELSEIF( tracerId.GE.GAD_TR1 |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
208 |
GAD_DIAGNOSTICS_INIT |
& .AND. tracerId.LT.100 ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
209 |
GAD_DIAGNOSTICS_INIT |
WRITE(GAD_DIAG_SUFX,'(A,I2.2)') 'Tr',tracerId + 1-GAD_TR1 |