| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_init_veg.F |
112 |
FIZHI_INIT_VEG |
DO BJ = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_veg.F |
142 |
FIZHI_INIT_VEG |
DO BJ = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
79 |
UPDATE_OCEAN_EXPORTS |
DO BJ = myByLo(myThid),myByHi(myThid) |
|
./pkg/mom_vecinv/mom_vi_u_grad_ke.F |
34 |
MOM_VI_U_GRAD_KE |
& *_maskW(i,j,k,BI,BJ) |
|
./pkg/mom_vecinv/mom_vi_v_grad_ke.F |
34 |
MOM_VI_V_GRAD_KE |
& *_maskS(i,j,k,BI,BJ) |
|
./pkg/monitor/mon_advcfl.F |
43 |
MON_ADVCFL |
tmpVal=abs(U(I,J,K,bi,bj))*rDx(I,J,BI,BJ)*dT |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
60 |
COST_TEST |
IF ( maskW(I,J,K,BI,BJ) .NE. 0. ) THEN |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
62 |
COST_TEST |
& + uVel(I,J,K,BI,BJ) |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
63 |
COST_TEST |
& *_hFacW(I,J,K,BI,BJ) |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
64 |
COST_TEST |
& *dyG(I,J,BI,BJ)*drF(K) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
100 |
FIZHI_INIT_VEG |
DO BJ = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
68 |
FIZHI_INIT_VEG |
DO BJ = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
79 |
UPDATE_OCEAN_EXPORTS |
DO BJ = myByLo(myThid),myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
112 |
FIZHI_INIT_VEG |
DO BJ = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
73 |
FIZHI_INIT_VEG |
DO BJ = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
43 |
UPDATE_OCEAN_EXPORTS |
DO BJ = myByLo(myThid),myByHi(myThid) |
|
./pkg/cost/cost_depth.F |
44 |
COST_DEPTH |
IF ( maskC(I,J,K,BI,BJ) .NE. 0. ) THEN |
|
./pkg/cost/cost_depth.F |
45 |
COST_DEPTH |
objf_depth(BI,BJ) = objf_depth(BI,BJ) + R_low(I,J,BI,BJ) |