File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_advection.F |
142 |
GAD_ADVECTION |
LOGICAL N_edge, S_edge, E_edge, W_edge |
./pkg/generic_advdiff/gad_advection.F |
206 |
GAD_ADVECTION |
S_edge = exch2_isSedge(myTile).EQ.1 |
./pkg/generic_advdiff/gad_advection.F |
212 |
GAD_ADVECTION |
S_edge = .TRUE. |
./pkg/generic_advdiff/gad_advection.F |
219 |
GAD_ADVECTION |
S_edge = .FALSE. |
./pkg/generic_advdiff/gad_advection.F |
318 |
GAD_ADVECTION |
IF ( .NOT.overlapOnly .OR. N_edge .OR. S_edge ) THEN |
./pkg/generic_advdiff/gad_advection.F |
383 |
GAD_ADVECTION |
IF ( S_edge ) THEN |
./pkg/generic_advdiff/gad_advection.F |
412 |
GAD_ADVECTION |
IF ( interiorOnly .AND. S_edge ) jMinUpd = 1 |
./pkg/generic_advdiff/gad_advection.F |
517 |
GAD_ADVECTION |
IF ( S_edge ) jMinUpd = 1 |