| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
327 |
GAD_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
350 |
GAD_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
357 |
GAD_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_TEMPERATURE ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
359 |
GAD_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SALINITY ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
364 |
GAD_DIAGNOSTICS_INIT |
ELSEIF( tracerId.GE.GAD_TR1 |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
365 |
GAD_DIAGNOSTICS_INIT |
& .AND. tracerId.LT.GAD_TR1+PTRACERS_num ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
368 |
GAD_DIAGNOSTICS_INIT |
GAD_DIAG_SUFX = 'Tr'//PTRACERS_ioLabel( tracerId+1-GAD_TR1 ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
130 |
PTRACERS_DIAGNOSTICS_INIT |
tracerId = iTrc + GAD_TR1 - 1 |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
131 |
PTRACERS_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
50 |
PTRACERS_DIAGNOSTICS_INIT |
INTEGER iTrc, ilnb, ilng, tracerId |
|
./model/src/impldiff.F |
11 |
IMPLDIFF |
I tracerId, KappaRX, recip_hFac, |
|
./model/src/impldiff.F |
303 |
IMPLDIFF |
IF ( useDiagnostics .AND.tracerId.NE.0 ) THEN |
|
./model/src/impldiff.F |
304 |
IMPLDIFF |
IF ( tracerId.GE. 1 ) THEN |
|
./model/src/impldiff.F |
307 |
IMPLDIFF |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./model/src/impldiff.F |
312 |
IMPLDIFF |
ELSEIF ( tracerId.EQ. -1 ) THEN |
|
./model/src/impldiff.F |
314 |
IMPLDIFF |
ELSEIF ( tracerId.EQ. -2 ) THEN |
|
./model/src/impldiff.F |
329 |
IMPLDIFF |
ELSEIF ( tracerId.GE.1 ) THEN |
|
./model/src/impldiff.F |
345 |
IMPLDIFF |
ELSEIF ( tracerId.EQ.-1 ) THEN |
|
./model/src/impldiff.F |
361 |
IMPLDIFF |
ELSEIF ( tracerId.EQ.-2 ) THEN |
|
./model/src/impldiff.F |
381 |
IMPLDIFF |
CALL LAYERS_FILL( df, tracerId, 'DFR', |
|
./model/src/impldiff.F |
56 |
IMPLDIFF |
INTEGER tracerId |
|
./model/src/impldiff.F |
91 |
IMPLDIFF |
IF ( tracerId.GE.GAD_TR1) THEN |
|
./model/src/impldiff.F |
95 |
IMPLDIFF |
ELSEIF ( tracerId.GE.1 ) THEN |
|
./model/src/impldiff.F |
97 |
IMPLDIFF |
IF ( tracerId.GE.1 ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
799 |
SEAICE_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION SEAICE_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
817 |
SEAICE_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/seaice/seaice_diagnostics_init.F |
824 |
SEAICE_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_HEFF ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
826 |
SEAICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_AREA ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
828 |
SEAICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SNOW ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
830 |
SEAICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SALT ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
296 |
THSICE_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION THSICE_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
313 |
THSICE_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/thsice/thsice_diagnostics_init.F |
320 |
THSICE_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_SI_FRAC ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
322 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_HSNOW ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
324 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_HICE ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
326 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_QICE1 ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
328 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_QICE2 ) THEN |