| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_implicit_r.F |
10 |
GAD_IMPLICIT_R |
I implicitAdvection, advectionScheme, tracerIdentity, |
|
./pkg/generic_advdiff/gad_implicit_r.F |
208 |
GAD_IMPLICIT_R |
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.k.LT.Nr) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
290 |
GAD_IMPLICIT_R |
diagSufx = GAD_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
338 |
GAD_IMPLICIT_R |
CALL LAYERS_FILL( df, tracerIdentity, 'DFR', |
|
./pkg/generic_advdiff/gad_implicit_r.F |
436 |
GAD_IMPLICIT_R |
CALL LAYERS_FILL(af,tracerIdentity,'AFR', |
|
./pkg/generic_advdiff/gad_implicit_r.F |
44 |
GAD_IMPLICIT_R |
INTEGER tracerIdentity |
|
./pkg/generic_advdiff/gad_som_advect.F |
13 |
GAD_SOM_ADVECT |
I tracerIdentity, deltaTLev, |
|
./pkg/generic_advdiff/gad_som_advect.F |
160 |
GAD_SOM_ADVECT |
diagSufx = GAD_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
430 |
GAD_SOM_ADVECT |
CALL LAYERS_FILL(afx,tracerIdentity,'AFX',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_som_advect.F |
431 |
GAD_SOM_ADVECT |
CALL LAYERS_FILL(afy,tracerIdentity,'AFY',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_som_advect.F |
438 |
GAD_SOM_ADVECT |
& .AND. tracerIdentity.EQ.GAD_TEMPERATURE |
|
./pkg/generic_advdiff/gad_som_advect.F |
53 |
GAD_SOM_ADVECT |
INTEGER tracerIdentity |
|
./pkg/generic_advdiff/gad_som_advect.F |
609 |
GAD_SOM_ADVECT |
CALL LAYERS_FILL(afr,tracerIdentity,'AFR', |
|
./pkg/gmredi/gmredi_calc_diff.F |
42 |
GMREDI_CALC_DIFF |
INTEGER tracerIdentity |
|
./pkg/gmredi/gmredi_calc_diff.F |
57 |
GMREDI_CALC_DIFF |
IF (tracerIdentity .LT. GAD_TR1) THEN |
|
./pkg/gmredi/gmredi_calc_diff.F |
76 |
GMREDI_CALC_DIFF |
IF (tracerIdentity .LT. GAD_TR1) THEN |
|
./pkg/gmredi/gmredi_calc_diff.F |
9 |
GMREDI_CALC_DIFF |
I tracerIdentity,myThid) |
|
./pkg/seaice/seaice_advection.F |
154 |
SEAICE_ADVECTION |
act0 = tracerIdentity - 1 |
|
./pkg/seaice/seaice_advection.F |
168 |
SEAICE_ADVECTION |
if (tracerIdentity.GT.maxpass) then |
|
./pkg/seaice/seaice_advection.F |
171 |
SEAICE_ADVECTION |
& maxpass, tracerIdentity |
|
./pkg/seaice/seaice_advection.F |
180 |
SEAICE_ADVECTION |
diagSufx = SEAICE_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/seaice/seaice_advection.F |
187 |
SEAICE_ADVECTION |
& .AND. ( tracerIdentity.EQ.GAD_HEFF .OR. |
|
./pkg/seaice/seaice_advection.F |
188 |
SEAICE_ADVECTION |
& tracerIdentity.EQ.GAD_QICE2 ) |
|
./pkg/seaice/seaice_advection.F |
18 |
SEAICE_ADVECTION |
I tracerIdentity, |
|
./pkg/seaice/seaice_advection.F |
321 |
SEAICE_ADVECTION |
IF (dBug.AND.bi.EQ.3 ) WRITE(ioUnit,*)'ICE_adv:',tracerIdentity, |
|
./pkg/seaice/seaice_advection.F |
757 |
SEAICE_ADVECTION |
& .AND. tracerIdentity.EQ.GAD_HEFF |
|
./pkg/seaice/seaice_advection.F |
85 |
SEAICE_ADVECTION |
INTEGER tracerIdentity |
|
./pkg/seaice/seaice_diffusion.F |
13 |
SEAICE_DIFFUSION |
I tracerIdentity, |
|
./pkg/seaice/seaice_diffusion.F |
53 |
SEAICE_DIFFUSION |
INTEGER tracerIdentity |
|
./pkg/seaice/seaice_diffusion.F |
76 |
SEAICE_DIFFUSION |
diagSufx = SEAICE_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/thsice/thsice_advection.F |
15 |
THSICE_ADVECTION |
I tracerIdentity, |
|
./pkg/thsice/thsice_advection.F |
169 |
THSICE_ADVECTION |
& .AND. ( tracerIdentity.EQ.GAD_SI_HICE .OR. |
|
./pkg/thsice/thsice_advection.F |
170 |
THSICE_ADVECTION |
& tracerIdentity.EQ.GAD_SI_QICE2 ) |
|
./pkg/thsice/thsice_advection.F |
299 |
THSICE_ADVECTION |
& 'ICE_adv:', tracerIdentity, ipass, bi, idb, jdb, |
|
./pkg/thsice/thsice_advection.F |
762 |
THSICE_ADVECTION |
& .AND. tracerIdentity.EQ.GAD_SI_HICE |
|
./pkg/thsice/thsice_advection.F |
80 |
THSICE_ADVECTION |
INTEGER tracerIdentity |