| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
326 |
GAD_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
349 |
GAD_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
356 |
GAD_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_TEMPERATURE ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
358 |
GAD_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SALINITY ) THEN |
|
./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/ptracers/ptracers_diagnostics_init.F |
127 |
PTRACERS_DIAGNOSTICS_INIT |
tracerId = iTrc + GAD_TR1 - 1 |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
128 |
PTRACERS_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
43 |
PTRACERS_DIAGNOSTICS_INIT |
INTEGER iTrc, ilnb, tracerId |
|
./pkg/seaice/seaice_diagnostics_init.F |
480 |
SEAICE_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION SEAICE_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
497 |
SEAICE_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/seaice/seaice_diagnostics_init.F |
504 |
SEAICE_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_HEFF ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
506 |
SEAICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_AREA ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
508 |
SEAICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SNOW ) THEN |
|
./pkg/seaice/seaice_diagnostics_init.F |
510 |
SEAICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SALT ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
287 |
THSICE_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION THSICE_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
304 |
THSICE_DIAGNOSTICS_INIT |
INTEGER tracerId |
|
./pkg/thsice/thsice_diagnostics_init.F |
311 |
THSICE_DIAGNOSTICS_INIT |
IF ( tracerId.EQ.GAD_SI_FRAC ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
313 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_HSNOW ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
315 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_HICE ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
317 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_QICE1 ) THEN |
|
./pkg/thsice/thsice_diagnostics_init.F |
319 |
THSICE_DIAGNOSTICS_INIT |
ELSEIF( tracerId.EQ.GAD_SI_QICE2 ) THEN |
|
./model/src/impldiff.F |
11 |
IMPLDIFF |
I tracerId, KappaRX, recip_hFac, |
|
./model/src/impldiff.F |
301 |
IMPLDIFF |
IF ( useDiagnostics .AND.tracerId.NE.0 ) THEN |
|
./model/src/impldiff.F |
302 |
IMPLDIFF |
IF ( tracerId.GE. 1 ) THEN |
|
./model/src/impldiff.F |
305 |
IMPLDIFF |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./model/src/impldiff.F |
310 |
IMPLDIFF |
ELSEIF ( tracerId.EQ. -1 ) THEN |
|
./model/src/impldiff.F |
312 |
IMPLDIFF |
ELSEIF ( tracerId.EQ. -2 ) THEN |
|
./model/src/impldiff.F |
327 |
IMPLDIFF |
ELSEIF ( tracerId.GE.1 ) THEN |
|
./model/src/impldiff.F |
341 |
IMPLDIFF |
ELSEIF ( tracerId.EQ.-1 ) THEN |
|
./model/src/impldiff.F |
357 |
IMPLDIFF |
ELSEIF ( tracerId.EQ.-2 ) THEN |
|
./model/src/impldiff.F |
53 |
IMPLDIFF |
INTEGER tracerId |
|
./model/src/impldiff.F |
88 |
IMPLDIFF |
IF ( tracerId.GE.GAD_TR1) THEN |
|
./model/src/impldiff.F |
92 |
IMPLDIFF |
ELSEIF ( tracerId.GE.1 ) THEN |
|
./model/src/impldiff.F |
94 |
IMPLDIFF |
IF ( tracerId.GE.1 ) THEN |