File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_advection.F |
154 |
GAD_ADVECTION |
LOGICAL calc_fluxes_X, calc_fluxes_Y, withSigns |
./pkg/generic_advdiff/gad_advection.F |
340 |
GAD_ADVECTION |
calc_fluxes_X = nCFace.EQ.6 .OR. nCFace.EQ.1 .OR. nCFace.EQ.2 |
./pkg/generic_advdiff/gad_advection.F |
345 |
GAD_ADVECTION |
calc_fluxes_X = nCFace.EQ.2 .OR. nCFace.EQ.3 .OR. nCFace.EQ.4 |
./pkg/generic_advdiff/gad_advection.F |
349 |
GAD_ADVECTION |
calc_fluxes_X = nCFace.EQ.5 .OR. nCFace.EQ.6 |
./pkg/generic_advdiff/gad_advection.F |
354 |
GAD_ADVECTION |
calc_fluxes_X = MOD(ipass,2).EQ.1 |
./pkg/generic_advdiff/gad_advection.F |
355 |
GAD_ADVECTION |
calc_fluxes_Y = .NOT.calc_fluxes_X |
./pkg/generic_advdiff/gad_advection.F |
376 |
GAD_ADVECTION |
IF (calc_fluxes_X) THEN |
./pkg/generic_advdiff/gad_som_advect.F |
131 |
GAD_SOM_ADVECT |
LOGICAL calc_fluxes_X, calc_fluxes_Y |
./pkg/generic_advdiff/gad_som_advect.F |
285 |
GAD_SOM_ADVECT |
calc_fluxes_X = nCFace.EQ.6 .OR. nCFace.EQ.1 .OR. nCFace.EQ.2 |
./pkg/generic_advdiff/gad_som_advect.F |
290 |
GAD_SOM_ADVECT |
calc_fluxes_X = nCFace.EQ.2 .OR. nCFace.EQ.3 .OR. nCFace.EQ.4 |
./pkg/generic_advdiff/gad_som_advect.F |
294 |
GAD_SOM_ADVECT |
calc_fluxes_X = nCFace.EQ.5 .OR. nCFace.EQ.6 |
./pkg/generic_advdiff/gad_som_advect.F |
299 |
GAD_SOM_ADVECT |
calc_fluxes_X = MOD(ipass,2).EQ.1 |
./pkg/generic_advdiff/gad_som_advect.F |
300 |
GAD_SOM_ADVECT |
calc_fluxes_Y = .NOT.calc_fluxes_X |
./pkg/generic_advdiff/gad_som_advect.F |
309 |
GAD_SOM_ADVECT |
IF ( calc_fluxes_X .AND. |
./pkg/seaice/seaice_advection.F |
134 |
SEAICE_ADVECTION |
LOGICAL calc_fluxes_X, calc_fluxes_Y, withSigns |
./pkg/seaice/seaice_advection.F |
306 |
SEAICE_ADVECTION |
calc_fluxes_X = nCFace.EQ.6 .OR. nCFace.EQ.1 .OR. nCFace.EQ.2 |
./pkg/seaice/seaice_advection.F |
310 |
SEAICE_ADVECTION |
calc_fluxes_X = nCFace.EQ.2 .OR. nCFace.EQ.3 .OR. nCFace.EQ.4 |
./pkg/seaice/seaice_advection.F |
313 |
SEAICE_ADVECTION |
calc_fluxes_X = nCFace.EQ.5 .OR. nCFace.EQ.6 |
./pkg/seaice/seaice_advection.F |
318 |
SEAICE_ADVECTION |
calc_fluxes_X = MOD(ipass,2).EQ.1 |
./pkg/seaice/seaice_advection.F |
319 |
SEAICE_ADVECTION |
calc_fluxes_Y = .NOT.calc_fluxes_X |
./pkg/seaice/seaice_advection.F |
322 |
SEAICE_ADVECTION |
& ipass,calc_fluxes_X,calc_fluxes_Y,overlapOnly,interiorOnly |
./pkg/seaice/seaice_advection.F |
336 |
SEAICE_ADVECTION |
IF (calc_fluxes_X) THEN |
./pkg/thsice/thsice_advection.F |
135 |
THSICE_ADVECTION |
LOGICAL calc_fluxes_X, calc_fluxes_Y, withSigns |
./pkg/thsice/thsice_advection.F |
280 |
THSICE_ADVECTION |
calc_fluxes_X = nCFace.EQ.6 .OR. nCFace.EQ.1 .OR. nCFace.EQ.2 |
./pkg/thsice/thsice_advection.F |
285 |
THSICE_ADVECTION |
calc_fluxes_X = nCFace.EQ.2 .OR. nCFace.EQ.3 .OR. nCFace.EQ.4 |
./pkg/thsice/thsice_advection.F |
289 |
THSICE_ADVECTION |
calc_fluxes_X = nCFace.EQ.5 .OR. nCFace.EQ.6 |
./pkg/thsice/thsice_advection.F |
294 |
THSICE_ADVECTION |
calc_fluxes_X = MOD(ipass,2).EQ.1 |
./pkg/thsice/thsice_advection.F |
295 |
THSICE_ADVECTION |
calc_fluxes_Y = .NOT.calc_fluxes_X |
./pkg/thsice/thsice_advection.F |
300 |
THSICE_ADVECTION |
& calc_fluxes_X, calc_fluxes_Y, overlapOnly, interiorOnly |
./pkg/thsice/thsice_advection.F |
306 |
THSICE_ADVECTION |
IF (calc_fluxes_X) THEN |