| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
822 |
NO PROCEDURE |
& gravFacC, recip_gravFacC, gravFacF, recip_gravFacF, |
|
./model/inc/PARAMS.h |
924 |
NO PROCEDURE |
_RL gravFacC(Nr), recip_gravFacC(Nr) |
|
./model/src/calc_phi_hyd.F |
232 |
CALC_PHI_HYD |
& + halfRL*drF(k)*gravFacC(k)*gravity |
|
./model/src/calc_phi_hyd.F |
235 |
CALC_PHI_HYD |
& + drF(k)*gravFacC(k)*gravity |
|
./model/src/calc_phi_hyd.F |
247 |
CALC_PHI_HYD |
phiHydC(i,j) = ddRloc*gravFacC(k)*gravity |
|
./model/src/calc_phi_hyd.F |
251 |
CALC_PHI_HYD |
& + halfRL*drF(k)*gravFacC(k)*gravity |
|
./model/src/calc_phi_hyd.F |
255 |
CALC_PHI_HYD |
& + halfRL*drF(k)*gravFacC(k)*gravity |
|
./model/src/config_summary.F |
321 |
CONFIG_SUMMARY |
CALL WRITE_1D_RL( gravFacC, Nr, INDEX_K, 'gravFacC = ', |
|
./model/src/diags_phi_rlow.F |
91 |
DIAGS_PHI_RLOW |
& + ddRloc*gravFacC(k)*gravity*alphRho(i,j)*recip_rhoConst |
|
./model/src/find_hyd_press_1d.F |
93 |
FIND_HYD_PRESS_1D |
& + rhoCen(k)*gravity*gravFacC(k)*drF(k)*halfRL |
|
./model/src/find_hyd_press_1d.F |
95 |
FIND_HYD_PRESS_1D |
& + rhoCen(k)*gravity*gravFacC(k)*drF(k) |
|
./model/src/load_ref_files.F |
126 |
LOAD_REF_FILES |
CALL READ_GLVEC_RL( gravityFile, ' ', gravFacC, Nr, 1, myThid ) |
|
./model/src/load_ref_files.F |
139 |
LOAD_REF_FILES |
gravFacC(k) = gravFacC(k)*recip_gravity |
|
./model/src/load_ref_files.F |
143 |
LOAD_REF_FILES |
gravFacF(k) = ( gravFacC(k-1)*(rF(k)-rC(k)) |
|
./model/src/load_ref_files.F |
144 |
LOAD_REF_FILES |
& + gravFacC(k)*(rC(k-1)-rF(k)) )*recip_drC(k) |
|
./model/src/load_ref_files.F |
147 |
LOAD_REF_FILES |
gravFacF(Nr+1) = ( gravFacC(Nr)*(rF(Nr+1)-rF(Nr)) |
|
./model/src/load_ref_files.F |
152 |
LOAD_REF_FILES |
recip_gravFacC(k) = 1. _d 0/gravFacC(k) |
|
./model/src/load_ref_files.F |
161 |
LOAD_REF_FILES |
gravFacC(k) = 1. _d 0 |
|
./model/src/set_ref_state.F |
105 |
SET_REF_STATE |
& + halfRL*drF(k)*gravity*gravFacC(k) |
|
./model/src/set_ref_state.F |
106 |
SET_REF_STATE |
phiRef(2*k+1) = phiRef(2*k-1) + drF(k)*gravity*gravFacC(k) |
|
./model/src/set_ref_state.F |
369 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'GravFacC',' ',gravFacC, Nr, -1, myThid ) |