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 |
207 |
GAD_ADVECTION |
E_edge = exch2_isEedge(myTile).EQ.1 |
./pkg/generic_advdiff/gad_advection.F |
213 |
GAD_ADVECTION |
E_edge = .TRUE. |
./pkg/generic_advdiff/gad_advection.F |
220 |
GAD_ADVECTION |
E_edge = .FALSE. |
./pkg/generic_advdiff/gad_advection.F |
381 |
GAD_ADVECTION |
IF ( E_edge ) iMaxUpd = sNx |
./pkg/generic_advdiff/gad_advection.F |
455 |
GAD_ADVECTION |
IF ( .NOT.overlapOnly .OR. E_edge .OR. W_edge ) THEN |
./pkg/generic_advdiff/gad_advection.F |
532 |
GAD_ADVECTION |
IF ( E_edge ) THEN |
./pkg/generic_advdiff/gad_advection.F |
550 |
GAD_ADVECTION |
IF ( interiorOnly .AND. E_edge ) iMaxUpd = sNx |