File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_coms.h |
32 |
NO PROCEDURE |
COMMON /physics_exports/ guphy,gvphy,gthphy,gsphy |
./pkg/fizhi/fizhi_coms.h |
37 |
NO PROCEDURE |
_RL gsphy(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./pkg/fizhi/fizhi_init_vars.F |
220 |
FIZHI_INIT_VARS |
gsphy(i,j,L,bi,bj) = 0. |
./pkg/fizhi/fizhi_tendency_apply.F |
325 |
FIZHI_TENDENCY_APPLY_S |
& + maskC(i,j,kLev,bi,bj)*gsphy(i,j,kLev,bi,bj) |
./pkg/fizhi/fizhi_tendency_apply.F |
332 |
FIZHI_TENDENCY_APPLY_S |
tmpdiag(i,j) = ( maskC(i,j,kLev,bi,bj) * gsphy(i,j,kLev,bi,bj) ) |
./pkg/fizhi/fizhi_wrapper.F |
322 |
FIZHI_WRAPPER |
& nSx,nSy,im1,im2,jm1,jm2,bi,bj,pedyn,kSurfC,Nr,nlperdyn,gsphy) |
./pkg/fizhi/fizhi_wrapper.F |
340 |
FIZHI_WRAPPER |
_EXCH_XYZ_RL(gsphy,myThid) |
./pkg/fizhi/step_fizhi_corr.F |
477 |
STEP_FIZHI_CORR |
. gsphy(i,j,L,bi,bj) |
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
201 |
FIZHI_INIT_VARS |
gsphy(i,j,L,bi,bj) = 0. |
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
185 |
FIZHI_TENDENCY_APPLY_S |
. *( gS_arr(i,j) + gsphy(i,j,kLev,bi,bj) ) |