| 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 |
247 |
GAD_ADVECTION |
S_edge = exch2_isSedge(myTile).EQ.1 |
|
./pkg/generic_advdiff/gad_advection.F |
253 |
GAD_ADVECTION |
S_edge = .TRUE. |
|
./pkg/generic_advdiff/gad_advection.F |
261 |
GAD_ADVECTION |
S_edge = .FALSE. |
|
./pkg/generic_advdiff/gad_advection.F |
377 |
GAD_ADVECTION |
IF ( .NOT.overlapOnly .OR. N_edge .OR. S_edge ) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
464 |
GAD_ADVECTION |
IF ( S_edge ) THEN |
|
./pkg/generic_advdiff/gad_advection.F |
515 |
GAD_ADVECTION |
IF ( interiorOnly .AND. S_edge ) jMinUpd = 1 |
|
./pkg/generic_advdiff/gad_advection.F |
658 |
GAD_ADVECTION |
IF ( S_edge ) jMinUpd = 1 |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
136 |
GAD_SOM_ADV_X |
IF ( S_edge ) THEN |
|
./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 |
141 |
GAD_SOM_ADV_X |
IF ( S_edge ) nbStrips = 2 |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
147 |
GAD_SOM_ADV_X |
IF ( interiorOnly .AND. S_edge ) jMinUpd(1) = 1 |
|
./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 |
134 |
GAD_SOM_ADV_Y |
IF ( S_edge ) jMinUpd(1) = 1 |
|
./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 |
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 |
219 |
GAD_SOM_ADVECT |
S_edge = exch2_isSedge(myTile).EQ.1 |
|
./pkg/generic_advdiff/gad_som_advect.F |
225 |
GAD_SOM_ADVECT |
S_edge = .TRUE. |
|
./pkg/generic_advdiff/gad_som_advect.F |
233 |
GAD_SOM_ADVECT |
S_edge = .FALSE. |
|
./pkg/generic_advdiff/gad_som_advect.F |
310 |
GAD_SOM_ADVECT |
& (.NOT.overlapOnly .OR. N_edge .OR. S_edge) |
|
./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 |
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 |
68 |
GAD_SOM_PREP_CS_CORNER |
southWestCorner = S_edge .AND. W_edge |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
69 |
GAD_SOM_PREP_CS_CORNER |
southEastCorner = S_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 |
216 |
SEAICE_ADVECTION |
S_edge = exch2_isSedge(myTile).EQ.1 |
|
./pkg/seaice/seaice_advection.F |
222 |
SEAICE_ADVECTION |
S_edge = .TRUE. |
|
./pkg/seaice/seaice_advection.F |
230 |
SEAICE_ADVECTION |
S_edge = .FALSE. |
|
./pkg/seaice/seaice_advection.F |
338 |
SEAICE_ADVECTION |
IF ( .NOT.overlapOnly .OR. N_edge .OR. S_edge ) THEN |
|
./pkg/seaice/seaice_advection.F |
422 |
SEAICE_ADVECTION |
IF ( S_edge .AND. extensiveFld ) THEN |
|
./pkg/seaice/seaice_advection.F |
432 |
SEAICE_ADVECTION |
ELSEIF ( S_edge ) THEN |
|
./pkg/seaice/seaice_advection.F |
467 |
SEAICE_ADVECTION |
IF ( S_edge ) THEN |
|
./pkg/seaice/seaice_advection.F |
486 |
SEAICE_ADVECTION |
IF ( interiorOnly .AND. S_edge ) jMinUpd = 1 |
|
./pkg/seaice/seaice_advection.F |
621 |
SEAICE_ADVECTION |
IF ( S_edge ) jMinUpd = 1 |
|
./pkg/thsice/thsice_advection.F |
139 |
THSICE_ADVECTION |
LOGICAL N_edge, S_edge, E_edge, W_edge |
|
./pkg/thsice/thsice_advection.F |
190 |
THSICE_ADVECTION |
S_edge = exch2_isSedge(myTile).EQ.1 |
|
./pkg/thsice/thsice_advection.F |
196 |
THSICE_ADVECTION |
S_edge = .TRUE. |
|
./pkg/thsice/thsice_advection.F |
204 |
THSICE_ADVECTION |
S_edge = .FALSE. |
|
./pkg/thsice/thsice_advection.F |
316 |
THSICE_ADVECTION |
IF ( .NOT.overlapOnly .OR. N_edge .OR. S_edge ) THEN |
|
./pkg/thsice/thsice_advection.F |
413 |
THSICE_ADVECTION |
IF ( S_edge ) THEN |
|
./pkg/thsice/thsice_advection.F |
484 |
THSICE_ADVECTION |
IF ( interiorOnly .AND. S_edge ) jMinUpd = 1 |
|
./pkg/thsice/thsice_advection.F |
625 |
THSICE_ADVECTION |
IF ( S_edge ) jMinUpd = 1 |