| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
150 |
GAD_SOM_PREP_CS_CORNER |
IF ( northEastCorner ) THEN |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
203 |
GAD_SOM_PREP_CS_CORNER |
IF ( northEastCorner ) THEN |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
65 |
GAD_SOM_PREP_CS_CORNER |
LOGICAL northEastCorner |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
70 |
GAD_SOM_PREP_CS_CORNER |
northEastCorner = N_edge .AND. E_edge |
|
./pkg/mom_common/mom_calc_hfacz.F |
250 |
MOM_CALC_HFACZ |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./pkg/mom_common/mom_calc_hfacz.F |
259 |
MOM_CALC_HFACZ |
northEastCorner = .TRUE. |
|
./pkg/mom_common/mom_calc_hfacz.F |
347 |
MOM_CALC_HFACZ |
IF ( northEastCorner ) THEN |
|
./pkg/mom_common/mom_calc_hfacz.F |
69 |
MOM_CALC_HFACZ |
LOGICAL northWestCorner, northEastCorner, |
|
./pkg/mom_common/mom_calc_relvort3.F |
100 |
MOM_CALC_RELVORT3 |
northEastCorner = .TRUE. |
|
./pkg/mom_common/mom_calc_relvort3.F |
258 |
MOM_CALC_RELVORT3 |
IF ( northEastCorner ) THEN |
|
./pkg/mom_common/mom_calc_relvort3.F |
38 |
MOM_CALC_RELVORT3 |
LOGICAL northWestCorner, northEastCorner, |
|
./pkg/mom_common/mom_calc_relvort3.F |
91 |
MOM_CALC_RELVORT3 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
109 |
MOM_VI_U_CORIOLIS_C4 |
IF ( northEastCorner ) THEN |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
54 |
MOM_VI_U_CORIOLIS_C4 |
LOGICAL northWestCorner, northEastCorner, |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
83 |
MOM_VI_U_CORIOLIS_C4 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
92 |
MOM_VI_U_CORIOLIS_C4 |
northEastCorner = .TRUE. |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
109 |
MOM_VI_V_CORIOLIS_C4 |
IF ( northEastCorner ) THEN |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
54 |
MOM_VI_V_CORIOLIS_C4 |
LOGICAL northWestCorner, northEastCorner, |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
83 |
MOM_VI_V_CORIOLIS_C4 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
92 |
MOM_VI_V_CORIOLIS_C4 |
northEastCorner = .TRUE. |
|
./pkg/monitor/mon_vort3.F |
162 |
MON_VORT3 |
northEastCorner = .TRUE. |
|
./pkg/monitor/mon_vort3.F |
171 |
MON_VORT3 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./pkg/monitor/mon_vort3.F |
180 |
MON_VORT3 |
northEastCorner = .FALSE. |
|
./pkg/monitor/mon_vort3.F |
227 |
MON_VORT3 |
IF ( northEastCorner ) THEN |
|
./pkg/monitor/mon_vort3.F |
53 |
MON_VORT3 |
LOGICAL northWestCorner, northEastCorner |
|
./pkg/shap_filt/shap_filt_computvort.F |
160 |
SHAP_FILT_COMPUTVORT |
IF ( northEastCorner ) THEN |
|
./pkg/shap_filt/shap_filt_computvort.F |
53 |
SHAP_FILT_COMPUTVORT |
LOGICAL northWestCorner, northEastCorner, |
|
./pkg/shap_filt/shap_filt_computvort.F |
90 |
SHAP_FILT_COMPUTVORT |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./pkg/shap_filt/shap_filt_computvort.F |
99 |
SHAP_FILT_COMPUTVORT |
northEastCorner = .TRUE. |
|
./pkg/shap_filt/shap_filt_relvort3.F |
107 |
SHAP_FILT_RELVORT3 |
northEastCorner = .TRUE. |
|
./pkg/shap_filt/shap_filt_relvort3.F |
268 |
SHAP_FILT_RELVORT3 |
IF ( northEastCorner ) THEN |
|
./pkg/shap_filt/shap_filt_relvort3.F |
41 |
SHAP_FILT_RELVORT3 |
LOGICAL northWestCorner, northEastCorner, |
|
./pkg/shap_filt/shap_filt_relvort3.F |
98 |
SHAP_FILT_RELVORT3 |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
157 |
FILL_CS_CORNER_AG_RL |
IF ( northEastCorner ) THEN |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
231 |
FILL_CS_CORNER_AG_RL |
IF ( northEastCorner ) THEN |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
64 |
FILL_CS_CORNER_AG_RL |
LOGICAL northEastCorner |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
82 |
FILL_CS_CORNER_AG_RL |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
90 |
FILL_CS_CORNER_AG_RL |
northEastCorner = .TRUE. |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
117 |
FILL_CS_CORNER_TR_RL |
IF ( northEastCorner ) THEN |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
186 |
FILL_CS_CORNER_TR_RL |
IF ( northEastCorner ) THEN |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
256 |
FILL_CS_CORNER_TR_RL |
IF ( northEastCorner ) THEN |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
64 |
FILL_CS_CORNER_TR_RL |
LOGICAL northEastCorner |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
82 |
FILL_CS_CORNER_TR_RL |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
90 |
FILL_CS_CORNER_TR_RL |
northEastCorner = .TRUE. |
|
./eesupp/src/fill_cs_corner_uv_rs.F |
170 |
FILL_CS_CORNER_UV_RS |
IF ( northEastCorner ) THEN |
|
./eesupp/src/fill_cs_corner_uv_rs.F |
61 |
FILL_CS_CORNER_UV_RS |
LOGICAL northEastCorner |
|
./eesupp/src/fill_cs_corner_uv_rs.F |
79 |
FILL_CS_CORNER_UV_RS |
northEastCorner = exch2_isEedge(myTile).EQ.1 |
|
./eesupp/src/fill_cs_corner_uv_rs.F |
87 |
FILL_CS_CORNER_UV_RS |
northEastCorner = .TRUE. |