| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_advection.F |
154 |
GAD_ADVECTION |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/generic_advdiff/gad_advection.F |
248 |
GAD_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
|
./pkg/generic_advdiff/gad_advection.F |
254 |
GAD_ADVECTION |
E_edge = .TRUE. |
|
./pkg/generic_advdiff/gad_advection.F |
262 |
GAD_ADVECTION |
E_edge = .FALSE. |
|
./pkg/generic_advdiff/gad_advection.F |
462 |
GAD_ADVECTION |
IF ( E_edge ) iMaxUpd = sNx |
|
./pkg/generic_advdiff/gad_advection.F |
574 |
GAD_ADVECTION |
IF ( .NOT.overlapOnly .OR. E_edge .OR. W_edge ) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
684 |
GAD_ADVECTION |
IF ( E_edge ) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
713 |
GAD_ADVECTION |
IF ( interiorOnly .AND. E_edge ) iMaxUpd = sNx |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
135 |
GAD_SOM_ADV_X |
IF ( E_edge ) iMaxUpd(1) = sNx |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
13 |
GAD_SOM_ADV_X |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
55 |
GAD_SOM_ADV_X |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
13 |
GAD_SOM_ADV_Y |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
140 |
GAD_SOM_ADV_Y |
IF ( E_edge ) THEN |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
148 |
GAD_SOM_ADV_Y |
IF ( interiorOnly .AND. E_edge ) iMaxUpd(1) = sNx |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
55 |
GAD_SOM_ADV_Y |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/generic_advdiff/gad_som_advect.F |
136 |
GAD_SOM_ADVECT |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/generic_advdiff/gad_som_advect.F |
220 |
GAD_SOM_ADVECT |
E_edge = exch2_isEedge(myTile).EQ.1 |
|
./pkg/generic_advdiff/gad_som_advect.F |
226 |
GAD_SOM_ADVECT |
E_edge = .TRUE. |
|
./pkg/generic_advdiff/gad_som_advect.F |
234 |
GAD_SOM_ADVECT |
E_edge = .FALSE. |
|
./pkg/generic_advdiff/gad_som_advect.F |
318 |
GAD_SOM_ADVECT |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_advect.F |
328 |
GAD_SOM_ADVECT |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_advect.F |
357 |
GAD_SOM_ADVECT |
& (.NOT.overlapOnly .OR. E_edge .OR. W_edge) |
|
./pkg/generic_advdiff/gad_som_advect.F |
365 |
GAD_SOM_ADVECT |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_advect.F |
375 |
GAD_SOM_ADVECT |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
12 |
GAD_SOM_PREP_CS_CORNER |
I N_edge, S_edge, E_edge, W_edge, |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
55 |
GAD_SOM_PREP_CS_CORNER |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
69 |
GAD_SOM_PREP_CS_CORNER |
southEastCorner = S_edge .AND. E_edge |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
70 |
GAD_SOM_PREP_CS_CORNER |
northEastCorner = N_edge .AND. E_edge |
|
./pkg/seaice/seaice_advection.F |
135 |
SEAICE_ADVECTION |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/seaice/seaice_advection.F |
217 |
SEAICE_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
|
./pkg/seaice/seaice_advection.F |
223 |
SEAICE_ADVECTION |
E_edge = .TRUE. |
|
./pkg/seaice/seaice_advection.F |
231 |
SEAICE_ADVECTION |
E_edge = .FALSE. |
|
./pkg/seaice/seaice_advection.F |
420 |
SEAICE_ADVECTION |
IF ( E_edge ) iMaxUpd = sNx |
|
./pkg/seaice/seaice_advection.F |
540 |
SEAICE_ADVECTION |
IF ( .NOT.overlapOnly .OR. E_edge .OR. W_edge ) THEN |
|
./pkg/seaice/seaice_advection.F |
646 |
SEAICE_ADVECTION |
IF ( E_edge .AND. extensiveFld ) THEN |
|
./pkg/seaice/seaice_advection.F |
656 |
SEAICE_ADVECTION |
ELSEIF ( E_edge ) THEN |
|
./pkg/seaice/seaice_advection.F |
676 |
SEAICE_ADVECTION |
IF ( E_edge ) THEN |
|
./pkg/seaice/seaice_advection.F |
689 |
SEAICE_ADVECTION |
IF ( interiorOnly .AND. E_edge ) iMaxUpd = sNx |
|
./pkg/thsice/thsice_advection.F |
139 |
THSICE_ADVECTION |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/thsice/thsice_advection.F |
191 |
THSICE_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
|
./pkg/thsice/thsice_advection.F |
197 |
THSICE_ADVECTION |
E_edge = .TRUE. |
|
./pkg/thsice/thsice_advection.F |
205 |
THSICE_ADVECTION |
E_edge = .FALSE. |
|
./pkg/thsice/thsice_advection.F |
407 |
THSICE_ADVECTION |
IF ( E_edge ) iMaxUpd = sNx |
|
./pkg/thsice/thsice_advection.F |
536 |
THSICE_ADVECTION |
IF ( .NOT.overlapOnly .OR. E_edge .OR. W_edge ) THEN |
|
./pkg/thsice/thsice_advection.F |
665 |
THSICE_ADVECTION |
IF ( E_edge ) THEN |
|
./pkg/thsice/thsice_advection.F |
704 |
THSICE_ADVECTION |
IF ( interiorOnly .AND. E_edge ) iMaxUpd = sNx |