| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
113 |
GAD_SOM_ADV_R |
LOGICAL noFlowAcrossSurf |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
149 |
GAD_SOM_ADV_R |
noFlowAcrossSurf = rigidLid .OR. nonlinFreeSurf.GE.1 |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
248 |
GAD_SOM_ADV_R |
& .NOT.noFlowAcrossSurf ) THEN |
|
./pkg/generic_advdiff/gad_som_advect.F |
137 |
GAD_SOM_ADVECT |
LOGICAL noFlowAcrossSurf |
|
./pkg/generic_advdiff/gad_som_advect.F |
452 |
GAD_SOM_ADVECT |
noFlowAcrossSurf = rigidLid .OR. nonlinFreeSurf.GE.1 |
|
./pkg/generic_advdiff/gad_som_advect.F |
518 |
GAD_SOM_ADVECT |
IF ( noFlowAcrossSurf .AND. k.EQ.1 ) THEN |
|
./pkg/generic_advdiff/gad_som_advect.F |
527 |
GAD_SOM_ADVECT |
ELSEIF ( noFlowAcrossSurf ) THEN |