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 |
205 |
GAD_ADVECTION |
N_edge = exch2_isNedge(myTile).EQ.1 |
./pkg/generic_advdiff/gad_advection.F |
211 |
GAD_ADVECTION |
N_edge = .TRUE. |
./pkg/generic_advdiff/gad_advection.F |
218 |
GAD_ADVECTION |
N_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 |
395 |
GAD_ADVECTION |
IF ( N_edge ) THEN |
./pkg/generic_advdiff/gad_advection.F |
413 |
GAD_ADVECTION |
IF ( interiorOnly .AND. N_edge ) jMaxUpd = sNy |
./pkg/generic_advdiff/gad_advection.F |
518 |
GAD_ADVECTION |
IF ( N_edge ) jMaxUpd = sNy |