File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_tendency_apply.F |
110 |
FIZHI_TENDENCY_APPLY_V |
_RL tmpdiag(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/fizhi/fizhi_tendency_apply.F |
184 |
FIZHI_TENDENCY_APPLY_T |
_RL tmpdiag(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/fizhi/fizhi_tendency_apply.F |
278 |
FIZHI_TENDENCY_APPLY_S |
_RL tmpdiag(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/fizhi/fizhi_tendency_apply.F |
35 |
FIZHI_TENDENCY_APPLY_U |
_RL tmpdiag(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/fizhi/fizhi_wrapper.F |
43 |
FIZHI_WRAPPER |
_RL pephy4fiz(1-OLx:sNx+Olx,1-Oly:sNy+Oly,Nrphys+1,nSx,nSy) |
./pkg/fizhi/fizhi_wrapper.F |
44 |
FIZHI_WRAPPER |
_RL pephy(1-OLx:sNx+Olx,1-Oly:sNy+Oly,Nrphys+1,nSx,nSy) |
./pkg/fizhi/fizhi_wrapper.F |
45 |
FIZHI_WRAPPER |
_RL pedyn(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr+1,nSx,nSy) |
./pkg/fizhi/fizhi_wrapper.F |
46 |
FIZHI_WRAPPER |
_RL tempphy(1-OLx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
43 |
STEP_FIZHI_CORR |
_RL pephy(1-OLx:sNx+Olx,1-Oly:sNy+Oly,Nrphys+1,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
44 |
STEP_FIZHI_CORR |
_RL pedyn(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr+1,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
45 |
STEP_FIZHI_CORR |
_RL windphy(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
46 |
STEP_FIZHI_CORR |
_RL udyntemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
47 |
STEP_FIZHI_CORR |
_RL vdyntemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
48 |
STEP_FIZHI_CORR |
_RL thdyntemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
49 |
STEP_FIZHI_CORR |
_RL sdyntemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
50 |
STEP_FIZHI_CORR |
_RL uphytemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
51 |
STEP_FIZHI_CORR |
_RL vphytemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
52 |
STEP_FIZHI_CORR |
_RL thphytemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
53 |
STEP_FIZHI_CORR |
_RL sphytemp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/step_fizhi_corr.F |
54 |
STEP_FIZHI_CORR |
_RL tempphy(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys,nSx,nSy) |
./pkg/fizhi/update_chemistry_exports.F |
30 |
UPDATE_CHEMISTRY_EXPORTS |
_RL pephy(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nrphys+1,nSx,nSy) |
./pkg/flt/flt_runga2.F |
198 |
FLT_RUNGA2 |
jc = MAX( 1-Oly, MIN( NINT(jpart(ip,bi,bj)), sNy+Oly ) ) |
./pkg/flt/flt_runga4.F |
305 |
FLT_RUNGA4 |
jc = MAX( 1-Oly, MIN( NINT(jpart(ip,bi,bj)), sNy+Oly ) ) |
./pkg/gchem/gchem_calc_tendency.F |
105 |
GCHEM_CALC_TENDENCY |
CALL CFC11_FORCING( Ptracer (1-Olx,1-Oly,1,bi,bj,1), |
./pkg/gchem/gchem_calc_tendency.F |
106 |
GCHEM_CALC_TENDENCY |
& gchemTendency(1-Olx,1-Oly,1,bi,bj,1), |
./pkg/gchem/gchem_calc_tendency.F |
109 |
GCHEM_CALC_TENDENCY |
CALL CFC12_FORCING( Ptracer (1-Olx,1-Oly,1,bi,bj,2), |
./pkg/gchem/gchem_calc_tendency.F |
110 |
GCHEM_CALC_TENDENCY |
& gchemTendency(1-Olx,1-Oly,1,bi,bj,2), |
./pkg/gchem/gchem_calc_tendency.F |
55 |
GCHEM_CALC_TENDENCY |
_RL PtrLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gchem/gchem_calc_tendency.F |
56 |
GCHEM_CALC_TENDENCY |
_RL gPtrLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gchem/gchem_calc_tendency.F |
65 |
GCHEM_CALC_TENDENCY |
DO J = 1-Oly, sNy+Oly |
./pkg/gchem/gchem_forcing_sep.F |
109 |
GCHEM_FORCING_SEP |
call DIC_BIOTIC_FORCING( Ptracer(1-Olx,1-Oly,1,bi,bj,1), |
./pkg/gchem/gchem_forcing_sep.F |
110 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,2), |
./pkg/gchem/gchem_forcing_sep.F |
111 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,3), |
./pkg/gchem/gchem_forcing_sep.F |
112 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,4), |
./pkg/gchem/gchem_forcing_sep.F |
113 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,5), |
./pkg/gchem/gchem_forcing_sep.F |
114 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,6), |
./pkg/gchem/gchem_forcing_sep.F |
119 |
GCHEM_FORCING_SEP |
call DIC_BIOTIC_FORCING( Ptracer(1-Olx,1-Oly,1,bi,bj,1), |
./pkg/gchem/gchem_forcing_sep.F |
120 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,2), |
./pkg/gchem/gchem_forcing_sep.F |
121 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,3), |
./pkg/gchem/gchem_forcing_sep.F |
122 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,4), |
./pkg/gchem/gchem_forcing_sep.F |
123 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,5), |
./pkg/gchem/gchem_forcing_sep.F |
127 |
GCHEM_FORCING_SEP |
call DIC_BIOTIC_FORCING( Ptracer(1-Olx,1-Oly,1,bi,bj,1), |
./pkg/gchem/gchem_forcing_sep.F |
128 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,2), |
./pkg/gchem/gchem_forcing_sep.F |
129 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,3), |
./pkg/gchem/gchem_forcing_sep.F |
130 |
GCHEM_FORCING_SEP |
& Ptracer(1-Olx,1-Oly,1,bi,bj,4), |
./pkg/gchem/gchem_forcing_sep.F |
142 |
GCHEM_FORCING_SEP |
call DARWIN_NUT_SUPPLY( Ptracer(1-Olx,1-Oly,1,bi,bj,1), |
./pkg/gchem/gchem_forcing_sep.F |
145 |
GCHEM_FORCING_SEP |
call DARWIN_NUT_SUPPLY( Ptracer(1-Olx,1-Oly,1,bi,bj,2), |
./pkg/gchem/gchem_forcing_sep.F |
148 |
GCHEM_FORCING_SEP |
call DARWIN_NUT_SUPPLY( Ptracer(1-Olx,1-Oly,1,bi,bj,3), |
./pkg/gchem/gchem_forcing_sep.F |
151 |
GCHEM_FORCING_SEP |
call DARWIN_NUT_SUPPLY( Ptracer(1-Olx,1-Oly,1,bi,bj,4), |
./pkg/gchem/gchem_forcing_sep.F |
159 |
GCHEM_FORCING_SEP |
call DARWIN_FORCING( Ptracer(1-Olx,1-Oly,1,1,1,1), |
./pkg/gchem/gchem_forcing_sep.F |
71 |
GCHEM_FORCING_SEP |
& ptracer(1-Olx,1-Oly,1,1,1,1), 1, gsm_dic, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
74 |
GCHEM_FORCING_SEP |
& ptracer(1-Olx,1-Oly,1,1,1,2), 1, gsm_alk, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
83 |
GCHEM_FORCING_SEP |
& ptracer(1-Olx,1-Oly,1,1,1,iDIC), 1, gsm_dic, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
86 |
GCHEM_FORCING_SEP |
& ptracer(1-Olx,1-Oly,1,1,1,iALK), 1, gsm_alk, myThid ) |
./pkg/generic_advdiff/gad_advection.F |
328 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
412 |
GAD_ADVECTION |
DO j=1-Oly,0 |
./pkg/generic_advdiff/gad_advection.F |
425 |
GAD_ADVECTION |
DO j=sNy+1,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
440 |
GAD_ADVECTION |
jMinUpd = 1-Oly |
./pkg/generic_advdiff/gad_advection.F |
441 |
GAD_ADVECTION |
jMaxUpd = sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
456 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
490 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
519 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
573 |
GAD_ADVECTION |
jMinUpd = 1-Oly+1 |
./pkg/generic_advdiff/gad_advection.F |
574 |
GAD_ADVECTION |
jMaxUpd = sNy+Oly-1 |
./pkg/generic_advdiff/gad_advection.F |
613 |
GAD_ADVECTION |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/generic_advdiff/gad_advection.F |
625 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
660 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
668 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
739 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
74 |
GAD_ADVECTION |
_RL uVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_advection.F |
756 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
75 |
GAD_ADVECTION |
_RL vVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_advection.F |
76 |
GAD_ADVECTION |
_RL wVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_advection.F |
77 |
GAD_ADVECTION |
_RL tracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_advection.F |
787 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
./pkg/generic_advdiff/gad_advection.F |
791 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
./pkg/generic_advdiff/gad_advection.F |
795 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
./pkg/generic_advdiff/gad_advection.F |
799 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
./pkg/generic_advdiff/gad_advection.F |
804 |
GAD_ADVECTION |
O fVerT(1-Olx,1-Oly,kUp), myThid ) |
./pkg/generic_advdiff/gad_advection.F |
827 |
GAD_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_advection.F |
844 |
GAD_ADVECTION |
CALL DIAGNOSTICS_FILL( fVerT(1-Olx,1-Oly,kUp), |
./pkg/generic_advdiff/gad_advection.F |
85 |
GAD_ADVECTION |
_RL gTracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_biharm_x.F |
51 |
GAD_BIHARM_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_biharm_y.F |
54 |
GAD_BIHARM_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/generic_advdiff/gad_c2_adv_r.F |
55 |
GAD_C2_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c2_adv_r.F |
61 |
GAD_C2_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c2_adv_x.F |
49 |
GAD_C2_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c2_adv_x.F |
52 |
GAD_C2_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c2_adv_y.F |
50 |
GAD_C2_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_c2_adv_y.F |
52 |
GAD_C2_ADV_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/generic_advdiff/gad_c4_adv_r.F |
68 |
GAD_C4_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c4_adv_r.F |
74 |
GAD_C4_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c4_adv_x.F |
56 |
GAD_C4_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c4_adv_x.F |
61 |
GAD_C4_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_c4_adv_y.F |
57 |
GAD_C4_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_c4_adv_y.F |
58 |
GAD_C4_ADV_Y |
vT(i,2-Oly)=0. |
./pkg/generic_advdiff/gad_c4_adv_y.F |
59 |
GAD_C4_ADV_Y |
vT(i,sNy+Oly)=0. |
./pkg/generic_advdiff/gad_c4_adv_y.F |
61 |
GAD_C4_ADV_Y |
DO j=1-Oly+2,sNy+Oly-1 |
./pkg/generic_advdiff/gad_calc_rhs.F |
210 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
227 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
235 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
243 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
247 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
253 |
GAD_CALC_RHS |
I uTrans, uFld, maskW(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
259 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
276 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
308 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
325 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
342 |
GAD_CALC_RHS |
I vTrans, vFld, maskS(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
350 |
GAD_CALC_RHS |
I vTrans, vFld, maskS(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
358 |
GAD_CALC_RHS |
I vTrans, vFld, maskS(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
362 |
GAD_CALC_RHS |
I vTrans, vFld, maskS(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
368 |
GAD_CALC_RHS |
I vTrans, vFld, maskS(1-Olx,1-Oly,k,bi,bj), locABT, |
./pkg/generic_advdiff/gad_calc_rhs.F |
374 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
391 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
423 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
455 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
459 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
467 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
475 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
479 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
485 |
GAD_CALC_RHS |
I deltaTLev(k),rTrans,wFld,TracAB(1-Olx,1-Oly,1,bi,bj), |
./pkg/generic_advdiff/gad_calc_rhs.F |
492 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
512 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
545 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
564 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
592 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_calc_rhs.F |
619 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/generic_advdiff/gad_calc_rhs.F |
691 |
GAD_CALC_RHS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/generic_advdiff/gad_check.F |
109 |
GAD_CHECK |
IF ( Olx.LT.minOlSize .OR. Oly.LT.minOlSize ) THEN |
./pkg/generic_advdiff/gad_check.F |
111 |
GAD_CHECK |
& Olx, Oly,' too small' |
./pkg/generic_advdiff/gad_del2.F |
48 |
GAD_DEL2 |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_del2.F |
56 |
GAD_DEL2 |
DO j=1-Oly,sNy+Oly-1 |
./pkg/generic_advdiff/gad_diff_r.F |
55 |
GAD_DIFF_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_diff_r.F |
61 |
GAD_DIFF_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_diff_x.F |
51 |
GAD_DIFF_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_diff_y.F |
52 |
GAD_DIFF_Y |
dfy(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_diff_y.F |
54 |
GAD_DIFF_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
66 |
GAD_DST2U1_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
72 |
GAD_DST2U1_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
63 |
GAD_DST2U1_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
66 |
GAD_DST2U1_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
63 |
GAD_DST2U1_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
65 |
GAD_DST2U1_ADV_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
75 |
GAD_DST3_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
72 |
GAD_DST3_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst3_adv_x.F |
77 |
GAD_DST3_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
72 |
GAD_DST3_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
73 |
GAD_DST3_ADV_Y |
vT(i,2-Oly)=0. |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
74 |
GAD_DST3_ADV_Y |
vT(i,sNy+Oly)=0. |
./pkg/generic_advdiff/gad_dst3_adv_y.F |
76 |
GAD_DST3_ADV_Y |
DO j=1-Oly+2,sNy+Oly-1 |
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
66 |
GAD_DST3FL_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
45 |
GAD_DST3FL_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
50 |
GAD_DST3FL_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
42 |
GAD_DST3FL_ADV_Y |
vT(i,1-Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
43 |
GAD_DST3FL_ADV_Y |
vT(i,2-Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
44 |
GAD_DST3FL_ADV_Y |
vT(i,sNy+Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
46 |
GAD_DST3FL_ADV_Y |
DO j=1-Oly+2,sNy+Oly-1 |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
76 |
GAD_FLUXLIMIT_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
82 |
GAD_FLUXLIMIT_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
68 |
GAD_FLUXLIMIT_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
73 |
GAD_FLUXLIMIT_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
69 |
GAD_FLUXLIMIT_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
70 |
GAD_FLUXLIMIT_ADV_Y |
vT(i,2-Oly)=0. |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
71 |
GAD_FLUXLIMIT_ADV_Y |
vT(i,sNy+Oly)=0. |
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
73 |
GAD_FLUXLIMIT_ADV_Y |
DO j=1-Oly+2,sNy+Oly-1 |
./pkg/generic_advdiff/gad_grad_x.F |
59 |
GAD_GRAD_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_grad_y.F |
60 |
GAD_GRAD_Y |
dTdy(I,1-Oly)=0. |
./pkg/generic_advdiff/gad_grad_y.F |
62 |
GAD_GRAD_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
114 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
122 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
172 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
178 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
186 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
193 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_implicit_r.F |
44 |
GAD_IMPLICIT_R |
_RL kappaRX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
45 |
GAD_IMPLICIT_R |
_RL wVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_implicit_r.F |
46 |
GAD_IMPLICIT_R |
_RL tracer (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_implicit_r.F |
47 |
GAD_IMPLICIT_R |
_RL gTracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/gad_implicit_r.F |
69 |
GAD_IMPLICIT_R |
_RL a5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
70 |
GAD_IMPLICIT_R |
_RL b5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
71 |
GAD_IMPLICIT_R |
_RL c5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
72 |
GAD_IMPLICIT_R |
_RL d5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
73 |
GAD_IMPLICIT_R |
_RL e5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
74 |
GAD_IMPLICIT_R |
_RL wFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/generic_advdiff/gad_implicit_r.F |
75 |
GAD_IMPLICIT_R |
_RL rTrans (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/generic_advdiff/gad_implicit_r.F |
76 |
GAD_IMPLICIT_R |
_RL rTransKp1(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/generic_advdiff/gad_implicit_r.F |
77 |
GAD_IMPLICIT_R |
_RL localTijk(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
84 |
GAD_IMPLICIT_R |
_RL df (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/generic_advdiff/gad_implicit_r.F |
97 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_init_varia.F |
46 |
GAD_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
59 |
GAD_OS7MP_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
53 |
GAD_OS7MP_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
62 |
GAD_OS7MP_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
54 |
GAD_OS7MP_ADV_Y |
vT(i,1-Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
55 |
GAD_OS7MP_ADV_Y |
vT(i,2-Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
56 |
GAD_OS7MP_ADV_Y |
vT(i,3-Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
57 |
GAD_OS7MP_ADV_Y |
vT(i,4-Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
58 |
GAD_OS7MP_ADV_Y |
vT(i,sNy+Oly-2)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
59 |
GAD_OS7MP_ADV_Y |
vT(i,sNy+Oly-1)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
60 |
GAD_OS7MP_ADV_Y |
vT(i,sNy+Oly)=0. _d 0 |
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
62 |
GAD_OS7MP_ADV_Y |
DO j=1-Oly+4,sNy+Oly-3 |
./pkg/generic_advdiff/gad_read_pickup.F |
132 |
GAD_READ_PICKUP |
O som_S(1-Olx,1-Oly,1,1,1,n), |
./pkg/generic_advdiff/gad_read_pickup.F |
91 |
GAD_READ_PICKUP |
O som_T(1-Olx,1-Oly,1,1,1,n), |
./pkg/generic_advdiff/gad_som_adv_x.F |
128 |
GAD_SOM_ADV_X |
jMinUpd(1) = 1-Oly |
./pkg/generic_advdiff/gad_som_adv_x.F |
129 |
GAD_SOM_ADV_X |
jMaxUpd(1) = sNy+Oly |
./pkg/generic_advdiff/gad_som_adv_x.F |
135 |
GAD_SOM_ADV_X |
jMinUpd(1) = 1-Oly |
./pkg/generic_advdiff/gad_som_adv_x.F |
141 |
GAD_SOM_ADV_X |
jMaxUpd(nbStrips) = sNy+Oly |
./pkg/generic_advdiff/gad_som_adv_y.F |
128 |
GAD_SOM_ADV_Y |
jMinUpd(1) = 1-Oly+1 |
./pkg/generic_advdiff/gad_som_adv_y.F |
129 |
GAD_SOM_ADV_Y |
jMaxUpd(1) = sNy+Oly-1 |
./pkg/generic_advdiff/gad_u3_adv_r.F |
63 |
GAD_U3_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_u3_adv_r.F |
69 |
GAD_U3_ADV_R |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_u3_adv_x.F |
55 |
GAD_U3_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_u3_adv_x.F |
60 |
GAD_U3_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/generic_advdiff/gad_u3_adv_y.F |
56 |
GAD_U3_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/generic_advdiff/gad_u3_adv_y.F |
57 |
GAD_U3_ADV_Y |
vT(i,2-Oly)=0. |
./pkg/generic_advdiff/gad_u3_adv_y.F |
58 |
GAD_U3_ADV_Y |
vT(i,sNy+Oly)=0. |
./pkg/generic_advdiff/gad_u3_adv_y.F |
60 |
GAD_U3_ADV_Y |
DO j=1-Oly+2,sNy+Oly-1 |
./pkg/generic_advdiff/gad_write_pickup.F |
102 |
GAD_WRITE_PICKUP |
I som_S(1-Olx,1-Oly,1,1,1,n), |
./pkg/generic_advdiff/gad_write_pickup.F |
85 |
GAD_WRITE_PICKUP |
I som_T(1-Olx,1-Oly,1,1,1,n), |
./pkg/generic_advdiff/salt_fill.F |
46 |
SALT_FILL |
_RL uVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/salt_fill.F |
47 |
SALT_FILL |
_RL vVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/generic_advdiff/salt_fill.F |
48 |
SALT_FILL |
_RL salt (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ggl90/ggl90_calc.F |
136 |
GGL90_CALC |
DO j=1-Oly,sNy+Oly |
./pkg/ggl90/ggl90_calc.F |
145 |
GGL90_CALC |
DO j=1-Oly,sNy+Oly |
./pkg/ggl90/ggl90_calc.F |
346 |
GGL90_CALC |
DO j=1-Oly,sNy+Oly |
./pkg/ggl90/ggl90_calc.F |
356 |
GGL90_CALC |
DO j=1-Oly,sNy+Oly |
./pkg/ggl90/ggl90_calc.F |
367 |
GGL90_CALC |
dfy(i,1-Oly)=0. _d 0 |
./pkg/ggl90/ggl90_calc.F |
369 |
GGL90_CALC |
DO j=1-Oly+1,sNy+Oly |
./pkg/ggl90/ggl90_calc.F |
380 |
GGL90_CALC |
DO j=1-Oly,sNy+Oly-1 |
./pkg/ggl90/ggl90_calc_diff.F |
38 |
GGL90_CALC_DIFF |
_RL KappaRx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/ggl90/ggl90_calc_visc.F |
31 |
GGL90_CALC_VISC |
_RL KappaRU(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/ggl90/ggl90_calc_visc.F |
32 |
GGL90_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/ggl90/ggl90_init_fixed.F |
49 |
GGL90_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/ggl90/ggl90_init_varia.F |
38 |
GGL90_INIT_VARIA |
DO J=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_diff.F |
41 |
GMREDI_CALC_DIFF |
_RL KappaRx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/gmredi/gmredi_calc_psi_b.F |
101 |
GMREDI_CALC_PSI_B |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_calc_psi_b.F |
126 |
GMREDI_CALC_PSI_B |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_psi_b.F |
143 |
GMREDI_CALC_PSI_B |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_calc_psi_b.F |
35 |
GMREDI_CALC_PSI_B |
_RL sigmaX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_psi_b.F |
36 |
GMREDI_CALC_PSI_B |
_RL sigmaY(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_psi_b.F |
37 |
GMREDI_CALC_PSI_B |
_RL sigmaR(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_psi_b.F |
38 |
GMREDI_CALC_PSI_B |
_RL ldd97_LrhoW(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
39 |
GMREDI_CALC_PSI_B |
_RL ldd97_LrhoS(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
49 |
GMREDI_CALC_PSI_B |
_RL SlopeX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
50 |
GMREDI_CALC_PSI_B |
_RL SlopeY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
51 |
GMREDI_CALC_PSI_B |
_RL dSigmaDrW(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
52 |
GMREDI_CALC_PSI_B |
_RL dSigmaDrS(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
53 |
GMREDI_CALC_PSI_B |
_RL taperX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
54 |
GMREDI_CALC_PSI_B |
_RL taperY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_psi_b.F |
82 |
GMREDI_CALC_PSI_B |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_psi_b.F |
93 |
GMREDI_CALC_PSI_B |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
143 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
157 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
168 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
184 |
GMREDI_CALC_TENSOR |
kLow_S(i,1-Oly) = 0 |
./pkg/gmredi/gmredi_calc_tensor.F |
185 |
GMREDI_CALC_TENSOR |
ldd97_LrhoS(i,1-Oly) = LrhoSup |
./pkg/gmredi/gmredi_calc_tensor.F |
187 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
201 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
213 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
223 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
232 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
243 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
271 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
289 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
303 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
365 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
388 |
GMREDI_CALC_TENSOR |
I kLowC(1-Olx,1-Oly,bi,bj), |
./pkg/gmredi/gmredi_calc_tensor.F |
391 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
409 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
419 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
463 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
489 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
534 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
53 |
GMREDI_CALC_TENSOR |
_RL sigmaX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_tensor.F |
544 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
54 |
GMREDI_CALC_TENSOR |
_RL sigmaY(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_tensor.F |
551 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
55 |
GMREDI_CALC_TENSOR |
_RL sigmaR(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_tensor.F |
571 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
613 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
632 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
647 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
67 |
GMREDI_CALC_TENSOR |
_RL SlopeX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
68 |
GMREDI_CALC_TENSOR |
_RL SlopeY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
69 |
GMREDI_CALC_TENSOR |
_RL dSigmaDx(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
70 |
GMREDI_CALC_TENSOR |
_RL dSigmaDy(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
719 |
GMREDI_CALC_TENSOR |
DO j=2-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
71 |
GMREDI_CALC_TENSOR |
_RL dSigmaDr(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
729 |
GMREDI_CALC_TENSOR |
DO j=2-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
72 |
GMREDI_CALC_TENSOR |
_RL SlopeSqr(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
736 |
GMREDI_CALC_TENSOR |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
73 |
GMREDI_CALC_TENSOR |
_RL taperFct(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
743 |
GMREDI_CALC_TENSOR |
DO j=2-Oly,sNy+Oly |
./pkg/gmredi/gmredi_calc_tensor.F |
758 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
75 |
GMREDI_CALC_TENSOR |
_RL ldd97_LrhoC(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
76 |
GMREDI_CALC_TENSOR |
_RL ldd97_LrhoW(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
77 |
GMREDI_CALC_TENSOR |
_RL ldd97_LrhoS(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
801 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
80 |
GMREDI_CALC_TENSOR |
INTEGER kLow_W (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
81 |
GMREDI_CALC_TENSOR |
INTEGER kLow_S (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
820 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
82 |
GMREDI_CALC_TENSOR |
_RL locMixLayer(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
835 |
GMREDI_CALC_TENSOR |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_tensor.F |
83 |
GMREDI_CALC_TENSOR |
_RL baseSlope (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
84 |
GMREDI_CALC_TENSOR |
_RL hTransLay (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
85 |
GMREDI_CALC_TENSOR |
_RL recipLambda(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
93 |
GMREDI_CALC_TENSOR |
_RL Ssq(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_calc_tensor.F |
975 |
GMREDI_CALC_TENSOR_DUMMY |
_RL sigmaX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_tensor.F |
976 |
GMREDI_CALC_TENSOR_DUMMY |
_RL sigmaY(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_tensor.F |
977 |
GMREDI_CALC_TENSOR_DUMMY |
_RL sigmaR(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_calc_tensor.F |
990 |
GMREDI_CALC_TENSOR_DUMMY |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_calc_wflow.F |
49 |
GMREDI_CALC_WFLOW |
DO j=1-Oly,sNy+Oly-1 |
./pkg/gmredi/gmredi_init_varia.F |
45 |
GMREDI_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/gmredi/gmredi_slope_limit.F |
105 |
GMREDI_SLOPE_LIMIT |
_RL dSigmMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
106 |
GMREDI_SLOPE_LIMIT |
_RL SlopeMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
107 |
GMREDI_SLOPE_LIMIT |
_RL dRdSigmaLtd(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
108 |
GMREDI_SLOPE_LIMIT |
_RL tmpFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
109 |
GMREDI_SLOPE_LIMIT |
_RL locVar(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
141 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
158 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
173 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
199 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_limit.F |
229 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
246 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
262 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
280 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
301 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
337 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
382 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
467 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
517 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
532 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
560 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
578 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
596 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
612 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
627 |
GMREDI_SLOPE_LIMIT |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/gmredi/gmredi_slope_limit.F |
78 |
GMREDI_SLOPE_LIMIT |
_RL SlopeX (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
79 |
GMREDI_SLOPE_LIMIT |
_RL SlopeY (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
80 |
GMREDI_SLOPE_LIMIT |
_RL SlopeSqr (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
81 |
GMREDI_SLOPE_LIMIT |
_RL taperFct (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
82 |
GMREDI_SLOPE_LIMIT |
_RL hTransLay (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
83 |
GMREDI_SLOPE_LIMIT |
_RL baseSlope (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
84 |
GMREDI_SLOPE_LIMIT |
_RL recipLambda(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
85 |
GMREDI_SLOPE_LIMIT |
_RL dSigmaDr (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
86 |
GMREDI_SLOPE_LIMIT |
_RL dSigmaDx (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
87 |
GMREDI_SLOPE_LIMIT |
_RL dSigmaDy (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
88 |
GMREDI_SLOPE_LIMIT |
_RL Lrho (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
89 |
GMREDI_SLOPE_LIMIT |
_RL hMixLay (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_limit.F |
91 |
GMREDI_SLOPE_LIMIT |
INTEGER kLow (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
105 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
113 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
123 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
132 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
142 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
148 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
158 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
167 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
195 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
204 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
213 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
227 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
236 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
245 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
264 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
272 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
285 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
293 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
305 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
311 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
322 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
342 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
380 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
389 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
401 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
410 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
422 |
GMREDI_SLOPE_PSI |
DO j=1-Oly,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
42 |
GMREDI_SLOPE_PSI |
_RL taperX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
433 |
GMREDI_SLOPE_PSI |
DO j=1-Oly+1,sNy+Oly |
./pkg/gmredi/gmredi_slope_psi.F |
43 |
GMREDI_SLOPE_PSI |
_RL taperY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
44 |
GMREDI_SLOPE_PSI |
_RL SlopeX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
45 |
GMREDI_SLOPE_PSI |
_RL SlopeY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
46 |
GMREDI_SLOPE_PSI |
_RL dSigmaDrW(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
47 |
GMREDI_SLOPE_PSI |
_RL dSigmaDrS(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
48 |
GMREDI_SLOPE_PSI |
_RL LrhoW(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
49 |
GMREDI_SLOPE_PSI |
_RL LrhoS(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/gmredi/gmredi_slope_psi.F |
58 |
GMREDI_SLOPE_PSI |
_RL dSigmaDrLtd(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/icefront/icefront_sgrunoff_read.F |
46 |
SGRUNOFF_READ |
DO J = 1-Oly,sNy+Oly |
./pkg/kpp/kpp_calc.F |
476 |
KPP_CALC |
I bi,bj,1-Olx,sNx+OLx,1-Oly,sNy+OLy, |
./pkg/kpp/kpp_calc.F |
478 |
KPP_CALC |
O KPPdiffKzS(1-Olx,1-Oly,1,bi,bj), |
./pkg/kpp/kpp_calc.F |
481 |
KPP_CALC |
I bi,bj,1-Olx,sNx+OLx,1-Oly,sNy+OLy, |
./pkg/kpp/kpp_calc.F |
483 |
KPP_CALC |
O KPPdiffKzT(1-Olx,1-Oly,1,bi,bj), |
./pkg/kpp/kpp_calc.F |
493 |
KPP_CALC |
U KPPdiffKzT(1-Olx,1-Oly,1,bi,bj), |
./pkg/kpp/kpp_calc.F |
494 |
KPP_CALC |
U KPPdiffKzS(1-Olx,1-Oly,1,bi,bj), |
./pkg/kpp/kpp_calc.F |
495 |
KPP_CALC |
I ikppkey,1-Olx,sNx+OLx,1-Oly,sNy+OLy,bi,bj,myThid) |
./pkg/kpp/kpp_calc.F |
507 |
KPP_CALC |
I , maskC(1-Olx,1-Oly,1,bi,bj) |
./pkg/kpp/kpp_calc.F |
510 |
KPP_CALC |
I , boplume, SaltPlumeDepth(1-Olx,1-Oly,bi,bj) |
./pkg/kpp/kpp_calc.F |
513 |
KPP_CALC |
I , KPPdiffKzS(1-Olx,1-Oly,1,bi,bj) |
./pkg/kpp/kpp_calc.F |
514 |
KPP_CALC |
I , KPPdiffKzT(1-Olx,1-Oly,1,bi,bj) |
./pkg/kpp/kpp_calc.F |
677 |
KPP_CALC_DUMMY |
I bi,bj,1-Olx,sNx+OLx,1-Oly,sNy+OLy, |
./pkg/kpp/kpp_calc.F |
679 |
KPP_CALC_DUMMY |
O KPPdiffKzS(1-Olx,1-Oly,1,bi,bj), |
./pkg/kpp/kpp_calc.F |
682 |
KPP_CALC_DUMMY |
I bi,bj,1-Olx,sNx+OLx,1-Oly,sNy+OLy, |
./pkg/kpp/kpp_calc.F |
684 |
KPP_CALC_DUMMY |
O KPPdiffKzT(1-Olx,1-Oly,1,bi,bj), |
./pkg/kpp/kpp_calc_diff_ptr.F |
41 |
KPP_CALC_DIFF_PTR |
_RL KappaRx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/kpp/kpp_calc_diff_s.F |
38 |
KPP_CALC_DIFF_S |
_RL KappaRS(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/kpp/kpp_calc_diff_t.F |
38 |
KPP_CALC_DIFF_T |
_RL KappaRT(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/kpp/kpp_calc_visc.F |
29 |
KPP_CALC_VISC |
_RL KappaRU(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/kpp/kpp_calc_visc.F |
30 |
KPP_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/kpp/kpp_routines.F |
1723 |
KPP_DOUBLEDIFF |
_RL KappaRT( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, Nr ) |
./pkg/kpp/kpp_routines.F |
1724 |
KPP_DOUBLEDIFF |
_RL KappaRS( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, Nr ) |
./pkg/kpp/kpp_routines.F |
1767 |
KPP_DOUBLEDIFF |
DO J = 1-Oly, sNy+Oly |
./pkg/kpp/kpp_routines.F |
1821 |
KPP_DOUBLEDIFF |
DO J = 1-Oly, sNy+Oly |
./model/inc/SURFACE.h |
45 |
NO PROCEDURE |
_RL etaHnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./model/inc/SURFACE.h |
46 |
NO PROCEDURE |
_RL dEtaHdt(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/land/land_ini_vars.F |
63 |
LAND_INI_VARS |
DO J=1-Oly,sNy+Oly |
./pkg/land/land_ini_vars.F |
73 |
LAND_INI_VARS |
DO J=1-Oly,sNy+Oly |
./pkg/layers/layers_init_varia.F |
35 |
LAYERS_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/longstep/longstep_thermodynamics.F |
112 |
LONGSTEP_THERMODYNAMICS |
_RL kappaRTr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,PTRACERS_num) |
./pkg/longstep/longstep_thermodynamics.F |
114 |
LONGSTEP_THERMODYNAMICS |
_RL kappaRk (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/longstep/longstep_thermodynamics.F |
307 |
LONGSTEP_THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./pkg/longstep/longstep_thermodynamics.F |
313 |
LONGSTEP_THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./pkg/longstep/longstep_thermodynamics.F |
334 |
LONGSTEP_THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./pkg/longstep/longstep_thermodynamics.F |
344 |
LONGSTEP_THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./pkg/matrix/matrix_init.F |
34 |
MATRIX_INIT |
DO j=1-Oly, sNy+Oly |
./pkg/matrix/matrix_store_tendency.F |
37 |
MATRIX_STORE_TENDENCY_EXP |
DO j=1-Oly, sNy+Oly |
./pkg/matrix/matrix_store_tendency.F |
85 |
MATRIX_STORE_TENDENCY_IMP |
DO j=1-Oly, sNy+Oly |
./pkg/matrix/matrix_write_tendency.F |
102 |
MATRIX_WRITE_TENDENCY |
& MATRIX(1-Olx,1-Oly,1,1,1,iTracer,2),iRec,myIter,myThid) |
./pkg/matrix/matrix_write_tendency.F |
111 |
MATRIX_WRITE_TENDENCY |
DO j=1-Oly, sNy+Oly |
./pkg/matrix/matrix_write_tendency.F |
45 |
MATRIX_WRITE_TENDENCY |
DO j=1-Oly, sNy+Oly |
./pkg/matrix/matrix_write_tendency.F |
59 |
MATRIX_WRITE_TENDENCY |
& MATRIX(1-Olx,1-Oly,1,1,1,iTracer,1),iRec,myIter,myThid) |
./pkg/matrix/matrix_write_tendency.F |
68 |
MATRIX_WRITE_TENDENCY |
DO j=1-Oly, sNy+Oly |
./pkg/matrix/matrix_write_tendency.F |
88 |
MATRIX_WRITE_TENDENCY |
DO j=1-Oly, sNy+Oly |
./pkg/mdsio/MDSIO_BUFF_WH.h |
24 |
NO PROCEDURE |
Real*8 fld2d_procbuff_r8( (sNx+2*Olx)*(sNy+2*Oly)*nSx*nSy ) |
./pkg/mdsio/MDSIO_BUFF_WH.h |
25 |
NO PROCEDURE |
Real*4 fld2d_procbuff_r4( (sNx+2*Olx)*(sNy+2*Oly)*nSx*nSy ) |
./pkg/mdsio/MDSIO_BUFF_WH.h |
26 |
NO PROCEDURE |
Real*4 fld2d_globuff_r4( (sNx+2*Olx)*(sNy+2*Oly)*nSx*nSy*nPx*nPy ) |
./pkg/mdsio/MDSIO_BUFF_WH.h |
27 |
NO PROCEDURE |
Real*8 fld2d_globuff_r8( (sNx+2*Olx)*(sNy+2*Oly)*nSx*nSy*nPx*nPy ) |
./pkg/mdsio/mdsio_facef_read.F |
44 |
MDS_FACEF_READ_RS |
_RS array(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./model/src/adams_bashforth2.F |
63 |
ADAMS_BASHFORTH2 |
DO j=1-Oly,sNy+Oly |
./pkg/mdsio/mdsio_read_whalos.F |
60 |
MDS_READ_WHALOS |
_RL fldRL(1-Olx:sNx+Olx,1-Oly:sNy+Oly,n2d,nSx,nSy) |
./pkg/mdsio/mdsio_read_whalos.F |
76 |
MDS_READ_WHALOS |
PARAMETER ( sNyWh = sNy+2*Oly ) |
./model/src/adams_bashforth3.F |
103 |
ADAMS_BASHFORTH3 |
DO j=1-Oly,sNy+Oly |
./model/src/adams_bashforth3.F |
116 |
ADAMS_BASHFORTH3 |
DO j=1-Oly,sNy+Oly |
./model/src/calc_3d_diffusivity.F |
112 |
CALC_3D_DIFFUSIVITY |
DO j = 1-Oly,sNy+Oly |
./model/src/calc_3d_diffusivity.F |
126 |
CALC_3D_DIFFUSIVITY |
DO j = 1-Oly, sNy+Oly |
./model/src/calc_3d_diffusivity.F |
143 |
CALC_3D_DIFFUSIVITY |
DO j = 1-Oly, sNy+Oly |
./model/src/calc_3d_diffusivity.F |
190 |
CALC_3D_DIFFUSIVITY |
DO j = 1-Oly, sNy+Oly |
./model/src/calc_3d_diffusivity.F |
58 |
CALC_3D_DIFFUSIVITY |
_RL KappaRTr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/calc_3d_diffusivity.F |
86 |
CALC_3D_DIFFUSIVITY |
DO j = 1-Oly,sNy+Oly |
./pkg/mdsio/mdsio_write_whalos.F |
60 |
MDS_WRITE_WHALOS |
_RL fldRL(1-Olx:sNx+Olx,1-Oly:sNy+Oly,n2d,nSx,nSy) |
./pkg/mdsio/mdsio_write_whalos.F |
76 |
MDS_WRITE_WHALOS |
PARAMETER ( sNyWh = sNy+2*Oly ) |
./model/src/calc_buoyancy.F |
30 |
CALC_BUOYANCY |
_RL rhoLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_buoyancy.F |
31 |
CALC_BUOYANCY |
_RL buoy (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_common_factors.F |
48 |
CALC_COMMON_FACTORS |
_RL uVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/calc_common_factors.F |
49 |
CALC_COMMON_FACTORS |
_RL vVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/calc_diffusivity.F |
179 |
CALC_DIFFUSIVITY |
DO j = 1-Oly, sNy+Oly |
./model/src/calc_diffusivity.F |
50 |
CALC_DIFFUSIVITY |
_RS maskUp(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_diffusivity.F |
51 |
CALC_DIFFUSIVITY |
_RL KappaRT(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_diffusivity.F |
52 |
CALC_DIFFUSIVITY |
_RL KappaRS(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_diffusivity.F |
73 |
CALC_DIFFUSIVITY |
DO j = 1-Oly, sNy+Oly |
./model/src/calc_diffusivity.F |
90 |
CALC_DIFFUSIVITY |
DO j = 1-Oly, sNy+Oly |
./pkg/mom_common/mom_calc_absvort3.F |
44 |
MOM_CALC_ABSVORT3 |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hdiv.F |
34 |
MOM_CALC_HDIV |
DO J=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_hdiv.F |
48 |
MOM_CALC_HDIV |
DO J=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_hfacz.F |
112 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
138 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
155 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
183 |
MOM_CALC_HFACZ |
hFacZ(i,1-Oly)=0. |
./pkg/mom_common/mom_calc_hfacz.F |
185 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
192 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
209 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
228 |
MOM_CALC_HFACZ |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
375 |
MOM_CALC_HFACZ |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_hfacz.F |
98 |
MOM_CALC_HFACZ |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_relvort3.F |
46 |
MOM_CALC_RELVORT3 |
DO J=1-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_relvort3.F |
53 |
MOM_CALC_RELVORT3 |
DO J=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_strain.F |
53 |
MOM_CALC_STRAIN |
DO J=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_tension.F |
49 |
MOM_CALC_TENSION |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_visc.F |
261 |
MOM_CALC_VISC |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_visc.F |
287 |
MOM_CALC_VISC |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_visc.F |
307 |
MOM_CALC_VISC |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_visc.F |
321 |
MOM_CALC_VISC |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_visc.F |
329 |
MOM_CALC_VISC |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_calc_visc.F |
337 |
MOM_CALC_VISC |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_visc.F |
347 |
MOM_CALC_VISC |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_calc_visc.F |
602 |
MOM_CALC_VISC |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_hdissip.F |
49 |
MOM_HDISSIP |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_init_fixed.F |
105 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
117 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
123 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
133 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
48 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
64 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
89 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_init_fixed.F |
95 |
MOM_INIT_FIXED |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_quasihydrostatic.F |
45 |
MOM_QUASIHYDROSTATIC |
_RL effectiveBuoy(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_common/mom_u_bottomdrag.F |
76 |
MOM_U_BOTTOMDRAG |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_u_coriolis_nh.F |
54 |
MOM_U_CORIOLIS_NH |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_u_implicit_r.F |
32 |
MOM_U_IMPLICIT_R |
_RL kappaRU(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_u_implicit_r.F |
43 |
MOM_U_IMPLICIT_R |
_RL b5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_u_implicit_r.F |
44 |
MOM_U_IMPLICIT_R |
_RL c5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_u_implicit_r.F |
45 |
MOM_U_IMPLICIT_R |
_RL d5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_u_implicit_r.F |
47 |
MOM_U_IMPLICIT_R |
_RL rTrans(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_common/mom_u_implicit_r.F |
53 |
MOM_U_IMPLICIT_R |
_RL vf (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_common/mom_u_implicit_r.F |
67 |
MOM_U_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_u_metric_nh.F |
54 |
MOM_U_METRIC_NH |
DO j=1-Olx,sNy+Oly |
./pkg/mom_common/mom_u_rviscflux.F |
52 |
MOM_U_RVISCFLUX |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_u_rviscflux.F |
58 |
MOM_U_RVISCFLUX |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_u_sidedrag.F |
112 |
MOM_U_SIDEDRAG |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_u_sidedrag.F |
66 |
MOM_U_SIDEDRAG |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_v_bottomdrag.F |
83 |
MOM_V_BOTTOMDRAG |
DO j=1-Oly+1,sNy+Oly-1 |
./model/src/calc_grad_phi_hyd.F |
49 |
CALC_GRAD_PHI_HYD |
_RL dPhiHydX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_grad_phi_hyd.F |
50 |
CALC_GRAD_PHI_HYD |
_RL dPhiHydY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_grad_phi_hyd.F |
60 |
CALC_GRAD_PHI_HYD |
_RL varLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_common/mom_v_coriolis_nh.F |
54 |
MOM_V_CORIOLIS_NH |
DO j=2-Oly,sNy+Oly |
./pkg/mom_common/mom_v_implicit_r.F |
32 |
MOM_V_IMPLICIT_R |
_RL kappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_v_implicit_r.F |
43 |
MOM_V_IMPLICIT_R |
_RL b5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_v_implicit_r.F |
44 |
MOM_V_IMPLICIT_R |
_RL c5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_v_implicit_r.F |
45 |
MOM_V_IMPLICIT_R |
_RL d5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/mom_common/mom_v_implicit_r.F |
47 |
MOM_V_IMPLICIT_R |
_RL rTrans(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_common/mom_v_implicit_r.F |
53 |
MOM_V_IMPLICIT_R |
_RL vf (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_common/mom_v_implicit_r.F |
67 |
MOM_V_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_v_metric_nh.F |
54 |
MOM_V_METRIC_NH |
DO j=1-Olx+1,sNy+Oly |
./pkg/mom_common/mom_v_rviscflux.F |
52 |
MOM_V_RVISCFLUX |
DO j=1-Oly,sNy+Oly |
./pkg/mom_common/mom_v_rviscflux.F |
58 |
MOM_V_RVISCFLUX |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_v_sidedrag.F |
109 |
MOM_V_SIDEDRAG |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_v_sidedrag.F |
66 |
MOM_V_SIDEDRAG |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_w_coriolis_nh.F |
53 |
MOM_W_CORIOLIS_NH |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_w_coriolis_nh.F |
69 |
MOM_W_CORIOLIS_NH |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_common/mom_w_metric_nh.F |
51 |
MOM_W_METRIC_NH |
DO j=1-Olx,sNy+Oly-1 |
./pkg/mom_common/mom_w_metric_nh.F |
68 |
MOM_W_METRIC_NH |
DO j=1-Olx,sNy+Oly-1 |
./pkg/mom_common/mom_w_sidedrag.F |
70 |
MOM_W_SIDEDRAG |
DO j=2-Oly,sNy+Oly-1 |
./model/src/calc_grad_phi_surf.F |
38 |
CALC_GRAD_PHI_SURF |
_RL phiSurfX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_grad_phi_surf.F |
39 |
CALC_GRAD_PHI_SURF |
_RL phiSurfY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/mom_fluxform/mom_fluxform.F |
287 |
MOM_FLUXFORM |
DO j=1-Oly,sNy+Oly |
./pkg/mom_fluxform/mom_fluxform.F |
424 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fVerU(1-Olx,1-Oly,kUp), |
./pkg/mom_fluxform/mom_fluxform.F |
640 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fVerV(1-Olx,1-Oly,kUp), |
./pkg/mom_fluxform/mom_fluxform.F |
865 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(gU(1-Olx,1-Oly,k,bi,bj), |
./pkg/mom_fluxform/mom_fluxform.F |
867 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(gV(1-Olx,1-Oly,k,bi,bj), |
./pkg/mom_fluxform/mom_u_adv_uu.F |
49 |
MOM_U_ADV_UU |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_adv_vu.F |
49 |
MOM_U_ADV_VU |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_u_adv_wu.F |
53 |
MOM_U_ADV_WU |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_u_adv_wu.F |
62 |
MOM_U_ADV_WU |
DO j=1-Oly,sNy+Oly |
./pkg/mom_fluxform/mom_u_adv_wu.F |
71 |
MOM_U_ADV_WU |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_u_adv_wu.F |
80 |
MOM_U_ADV_WU |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_u_adv_wu.F |
95 |
MOM_U_ADV_WU |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_u_coriolis.F |
51 |
MOM_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_coriolis.F |
62 |
MOM_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_coriolis.F |
79 |
MOM_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_del2u.F |
50 |
MOM_U_DEL2U |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_del2u.F |
65 |
MOM_U_DEL2U |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_u_del2u.F |
80 |
MOM_U_DEL2U |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_del2u.F |
93 |
MOM_U_DEL2U |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_metric_cylinder.F |
50 |
MOM_U_METRIC_CYLINDER |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_metric_sphere.F |
49 |
MOM_U_METRIC_SPHERE |
DO j=1-Olx,sNy+Oly-1 |
./pkg/mom_fluxform/mom_u_xviscflux.F |
54 |
MOM_U_XVISCFLUX |
DO j=1-Oly,sNy+Oly-1 |
./model/src/calc_gs.F |
167 |
CALC_GS |
I gsNm(1-Olx,1-Oly,1,1,1,m2), salt, dTtracerLev, |
./pkg/mom_fluxform/mom_u_yviscflux.F |
55 |
MOM_U_YVISCFLUX |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_adv_uv.F |
48 |
MOM_V_ADV_UV |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_adv_vv.F |
49 |
MOM_V_ADV_VV |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_v_adv_wv.F |
54 |
MOM_V_ADV_WV |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_adv_wv.F |
63 |
MOM_V_ADV_WV |
DO j=1-Oly,sNy+Oly |
./pkg/mom_fluxform/mom_v_adv_wv.F |
72 |
MOM_V_ADV_WV |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_adv_wv.F |
81 |
MOM_V_ADV_WV |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_adv_wv.F |
96 |
MOM_V_ADV_WV |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_coriolis.F |
51 |
MOM_V_CORIOLIS |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_coriolis.F |
62 |
MOM_V_CORIOLIS |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_coriolis.F |
77 |
MOM_V_CORIOLIS |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_del2v.F |
49 |
MOM_V_DEL2V |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/mom_fluxform/mom_v_del2v.F |
64 |
MOM_V_DEL2V |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_fluxform/mom_v_del2v.F |
79 |
MOM_V_DEL2V |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/mom_fluxform/mom_v_del2v.F |
92 |
MOM_V_DEL2V |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/mom_fluxform/mom_v_metric_cylinder.F |
50 |
MOM_V_METRIC_CYLINDER |
DO j=1-Oly+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_metric_sphere.F |
47 |
MOM_V_METRIC_SPHERE |
DO j=1-Olx+1,sNy+Oly |
./pkg/mom_fluxform/mom_v_xviscflux.F |
55 |
MOM_V_XVISCFLUX |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gt.F |
166 |
CALC_GT |
I gtNm(1-Olx,1-Oly,1,1,1,m2), theta, dTtracerLev, |
./model/src/calc_gt.F |
229 |
CALC_GT |
U gtNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/calc_gt.F |
233 |
CALC_GT |
U gtNm(1-Olx,1-Oly,1,1,1,2), |
./pkg/mom_fluxform/mom_v_yviscflux.F |
54 |
MOM_V_YVISCFLUX |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vecinv.F |
251 |
MOM_VECINV |
DO j=1-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vecinv.F |
301 |
MOM_VECINV |
DO j=1-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vecinv.F |
343 |
MOM_VECINV |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vecinv.F |
479 |
MOM_VECINV |
DO j=1-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vecinv.F |
751 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(gU(1-Olx,1-Oly,k,bi,bj), |
./pkg/mom_vecinv/mom_vecinv.F |
753 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(gV(1-Olx,1-Oly,k,bi,bj), |
./pkg/mom_vecinv/mom_vi_coriolis.F |
41 |
MOM_VI_CORIOLIS |
DO J=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_coriolis.F |
57 |
MOM_VI_CORIOLIS |
DO J=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_coriolis.F |
74 |
MOM_VI_CORIOLIS |
DO J=2-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_coriolis.F |
90 |
MOM_VI_CORIOLIS |
DO J=2-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_del2uv.F |
112 |
MOM_VI_DEL2UV |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_del2uv.F |
91 |
MOM_VI_DEL2UV |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
115 |
MOM_VI_HDISSIP |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
125 |
MOM_VI_HDISSIP |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_hdissip.F |
59 |
MOM_VI_HDISSIP |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
114 |
MOM_VI_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
145 |
MOM_VI_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
188 |
MOM_VI_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
63 |
MOM_VI_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
89 |
MOM_VI_U_CORIOLIS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
67 |
MOM_VI_U_CORIOLIS_C4 |
DO j=1-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_u_grad_ke.F |
31 |
MOM_VI_U_GRAD_KE |
DO J=1-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
56 |
MOM_VI_U_VERTSHEAR |
DO J=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
138 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
165 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
180 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
188 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
199 |
CALC_GW |
DO j=1-Oly+1,sNy+Oly |
./model/src/calc_gw.F |
214 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
254 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
267 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
283 |
CALC_GW |
DO j=1-Oly,sNy+Oly |
./model/src/calc_gw.F |
302 |
CALC_GW |
flx_NS(i,1-Oly)=0. |
./model/src/calc_gw.F |
304 |
CALC_GW |
DO j=1-Oly+1,sNy+Oly |
./model/src/calc_gw.F |
319 |
CALC_GW |
DO j=1-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
114 |
MOM_VI_V_CORIOLIS |
DO j=2-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
145 |
MOM_VI_V_CORIOLIS |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
188 |
MOM_VI_V_CORIOLIS |
DO j=2-Oly,sNy+Oly-1 |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
63 |
MOM_VI_V_CORIOLIS |
DO j=2-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
89 |
MOM_VI_V_CORIOLIS |
DO j=2-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
67 |
MOM_VI_V_CORIOLIS_C4 |
DO j=1-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_v_grad_ke.F |
31 |
MOM_VI_V_GRAD_KE |
DO J=2-Oly,sNy+Oly |
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
56 |
MOM_VI_V_VERTSHEAR |
DO J=2-Oly,sNy+Oly |
./model/src/calc_oce_mxlayer.F |
115 |
CALC_OCE_MXLAYER |
DO j=1-Oly,sNy+Oly |
./model/src/calc_oce_mxlayer.F |
142 |
CALC_OCE_MXLAYER |
DO j=1-Oly,sNy+Oly |
./model/src/calc_oce_mxlayer.F |
161 |
CALC_OCE_MXLAYER |
DO j=1-Oly,sNy+Oly |
./model/src/calc_oce_mxlayer.F |
192 |
CALC_OCE_MXLAYER |
DO j=1-Oly+1,sNy+Oly-1 |
./model/src/calc_oce_mxlayer.F |
208 |
CALC_OCE_MXLAYER |
DO j=1-Oly+1,sNy+Oly-1 |
./model/src/calc_oce_mxlayer.F |
99 |
CALC_OCE_MXLAYER |
DO j=1-Oly,sNy+Oly |
./pkg/monitor/mon_vort3.F |
83 |
MON_VORT3 |
DO j=1-Oly,sNy+Oly |
./model/src/calc_phi_hyd.F |
126 |
CALC_PHI_HYD |
DO j=1-Oly,sNy+Oly |
./model/src/calc_phi_hyd.F |
71 |
CALC_PHI_HYD |
_RL dPhiHydX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/calc_phi_hyd.F |
72 |
CALC_PHI_HYD |
_RL dPhiHydY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/my82/my82_calc.F |
75 |
MY82_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/my82/my82_calc.F |
82 |
MY82_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/my82/my82_calc_diff.F |
38 |
MY82_CALC_DIFF |
_RL KappaRx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/my82/my82_calc_visc.F |
29 |
MY82_CALC_VISC |
_RL KappaRU(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/my82/my82_calc_visc.F |
30 |
MY82_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/calc_r_star.F |
262 |
CALC_R_STAR |
DO j=1,Oly |
./model/src/calc_r_star.F |
287 |
CALC_R_STAR |
DO j=1-Oly,sNy+Oly |
./model/src/calc_r_star.F |
41 |
CALC_R_STAR |
_RL etaFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./model/src/calc_r_star.F |
83 |
CALC_R_STAR |
DO j=1-Oly,sNy+Oly |
./pkg/my82/my82_ri_number.F |
133 |
MY82_RI_NUMBER |
DO J=1-Oly+1,sNy+Oly-1 |
./pkg/mypackage/mypackage_init_varia.F |
41 |
MYPACKAGE_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/mypackage/mypackage_init_varia.F |
61 |
MYPACKAGE_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./model/src/calc_surf_dr.F |
38 |
CALC_SURF_DR |
_RL etaFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
225 |
NO PROCEDURE |
_RL OBEu (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
226 |
NO PROCEDURE |
_RL OBEv (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
227 |
NO PROCEDURE |
_RL OBEt (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
228 |
NO PROCEDURE |
_RL OBEs (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
233 |
NO PROCEDURE |
_RL OBEu0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
234 |
NO PROCEDURE |
_RL OBEv0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
235 |
NO PROCEDURE |
_RL OBEt0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
236 |
NO PROCEDURE |
_RL OBEs0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
237 |
NO PROCEDURE |
_RL OBEu1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
238 |
NO PROCEDURE |
_RL OBEv1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
239 |
NO PROCEDURE |
_RL OBEt1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
240 |
NO PROCEDURE |
_RL OBEs1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
246 |
NO PROCEDURE |
_RL OBEa (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
247 |
NO PROCEDURE |
_RL OBEh (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
248 |
NO PROCEDURE |
_RL OBEa0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
249 |
NO PROCEDURE |
_RL OBEh0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
250 |
NO PROCEDURE |
_RL OBEa1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
251 |
NO PROCEDURE |
_RL OBEh1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
252 |
NO PROCEDURE |
_RL OBEsl (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
253 |
NO PROCEDURE |
_RL OBEsn (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
254 |
NO PROCEDURE |
_RL OBEsl0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
255 |
NO PROCEDURE |
_RL OBEsn0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
256 |
NO PROCEDURE |
_RL OBEsl1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
257 |
NO PROCEDURE |
_RL OBEsn1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
258 |
NO PROCEDURE |
_RL OBEuice (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
259 |
NO PROCEDURE |
_RL OBEvice (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
260 |
NO PROCEDURE |
_RL OBEuice0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
261 |
NO PROCEDURE |
_RL OBEvice0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
262 |
NO PROCEDURE |
_RL OBEuice1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
263 |
NO PROCEDURE |
_RL OBEvice1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
270 |
NO PROCEDURE |
_RL OBWu (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
271 |
NO PROCEDURE |
_RL OBWv (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
272 |
NO PROCEDURE |
_RL OBWt (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
273 |
NO PROCEDURE |
_RL OBWs (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
278 |
NO PROCEDURE |
_RL OBWu0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
279 |
NO PROCEDURE |
_RL OBWv0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
280 |
NO PROCEDURE |
_RL OBWt0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
281 |
NO PROCEDURE |
_RL OBWs0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
282 |
NO PROCEDURE |
_RL OBWu1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
283 |
NO PROCEDURE |
_RL OBWv1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
284 |
NO PROCEDURE |
_RL OBWt1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
285 |
NO PROCEDURE |
_RL OBWs1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
291 |
NO PROCEDURE |
_RL OBWa (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
292 |
NO PROCEDURE |
_RL OBWh (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
293 |
NO PROCEDURE |
_RL OBWa0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
294 |
NO PROCEDURE |
_RL OBWh0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
295 |
NO PROCEDURE |
_RL OBWa1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
296 |
NO PROCEDURE |
_RL OBWh1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
297 |
NO PROCEDURE |
_RL OBWsl (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
298 |
NO PROCEDURE |
_RL OBWsn (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
299 |
NO PROCEDURE |
_RL OBWsl0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
300 |
NO PROCEDURE |
_RL OBWsn0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
301 |
NO PROCEDURE |
_RL OBWsl1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
302 |
NO PROCEDURE |
_RL OBWsn1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
303 |
NO PROCEDURE |
_RL OBWuice (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
304 |
NO PROCEDURE |
_RL OBWvice (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
305 |
NO PROCEDURE |
_RL OBWuice0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
306 |
NO PROCEDURE |
_RL OBWvice0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
307 |
NO PROCEDURE |
_RL OBWuice1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
308 |
NO PROCEDURE |
_RL OBWvice1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
317 |
NO PROCEDURE |
_RL OBEw (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
318 |
NO PROCEDURE |
_RL OBWw (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
325 |
NO PROCEDURE |
_RL OBEw0(1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
326 |
NO PROCEDURE |
_RL OBWw0(1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
329 |
NO PROCEDURE |
_RL OBEw1(1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
330 |
NO PROCEDURE |
_RL OBWw1(1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/OBCS.h |
339 |
NO PROCEDURE |
_RS OBEhfac0(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
340 |
NO PROCEDURE |
_RS OBWhfac0(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
345 |
NO PROCEDURE |
_RL OBEeta (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
346 |
NO PROCEDURE |
_RL OBWeta (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
353 |
NO PROCEDURE |
_RL OBEeta0(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
354 |
NO PROCEDURE |
_RL OBWeta0(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
357 |
NO PROCEDURE |
_RL OBEeta1(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
358 |
NO PROCEDURE |
_RL OBWeta1(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
93 |
NO PROCEDURE |
INTEGER OB_Ie(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS.h |
94 |
NO PROCEDURE |
INTEGER OB_Iw(1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/OBCS_PTRACERS.h |
29 |
NO PROCEDURE |
_RL OBEptr (1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/OBCS_PTRACERS.h |
32 |
NO PROCEDURE |
_RL OBEptr0(1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/OBCS_PTRACERS.h |
33 |
NO PROCEDURE |
_RL OBEptr1(1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/OBCS_PTRACERS.h |
38 |
NO PROCEDURE |
_RL OBWptr (1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/OBCS_PTRACERS.h |
41 |
NO PROCEDURE |
_RL OBWptr0(1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/OBCS_PTRACERS.h |
42 |
NO PROCEDURE |
_RL OBWptr1(1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./model/src/calc_viscosity.F |
40 |
CALC_VISCOSITY |
_RL KappaRU(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/calc_viscosity.F |
41 |
CALC_VISCOSITY |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/calc_viscosity.F |
52 |
CALC_VISCOSITY |
DO j = 1-Oly, sNy+Oly |
./pkg/obcs/obcs_apply_eta.F |
39 |
OBCS_APPLY_ETA |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_eta.F |
68 |
OBCS_APPLY_ETA |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_ptracer.F |
110 |
OBCS_APPLY_PTRACER |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_ptracer.F |
128 |
OBCS_APPLY_PTRACER |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_ptracer.F |
79 |
OBCS_APPLY_PTRACER |
DO j = Jobc, Jobc+Oly |
./pkg/obcs/obcs_apply_ptracer.F |
97 |
OBCS_APPLY_PTRACER |
DO j = Jobc-Oly, Jobc |
./pkg/obcs/obcs_apply_r_star.F |
63 |
OBCS_APPLY_R_STAR |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_seaice.F |
112 |
OBCS_APPLY_SEAICE |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_seaice.F |
214 |
OBCS_APPLY_SEAICE |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_seaice.F |
253 |
OBCS_APPLY_SEAICE |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_seaice.F |
58 |
OBCS_APPLY_SEAICE |
DO j = Jobc, Jobc+Oly |
./pkg/obcs/obcs_apply_seaice.F |
77 |
OBCS_APPLY_SEAICE |
DO j = Jobc-Oly, Jobc |
./pkg/obcs/obcs_apply_seaice.F |
93 |
OBCS_APPLY_SEAICE |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_sloc.F |
38 |
OBCS_APPLY_SLOC |
DO J = J_obc, J_obc+Oly |
./pkg/obcs/obcs_apply_sloc.F |
48 |
OBCS_APPLY_SLOC |
DO J = J_obc-Oly, J_obc |
./pkg/obcs/obcs_apply_sloc.F |
56 |
OBCS_APPLY_SLOC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_surf_dr.F |
62 |
OBCS_APPLY_SURF_DR |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_tloc.F |
38 |
OBCS_APPLY_TLOC |
DO J = J_obc, J_obc+Oly |
./pkg/obcs/obcs_apply_tloc.F |
48 |
OBCS_APPLY_TLOC |
DO J = J_obc-Oly, J_obc |
./pkg/obcs/obcs_apply_tloc.F |
56 |
OBCS_APPLY_TLOC |
DO J=1-Oly,sNy+Oly |
./model/src/calc_wsurf_tr.F |
43 |
CALC_WSURF_TR |
_RL thetaFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/calc_wsurf_tr.F |
44 |
CALC_WSURF_TR |
_RL saltFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/calc_wsurf_tr.F |
45 |
CALC_WSURF_TR |
_RL wVelFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_apply_ts.F |
103 |
OBCS_APPLY_TS |
DO j = Jobc-Oly, Jobc |
./pkg/obcs/obcs_apply_ts.F |
117 |
OBCS_APPLY_TS |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_ts.F |
135 |
OBCS_APPLY_TS |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_ts.F |
85 |
OBCS_APPLY_TS |
DO j = Jobc, Jobc+Oly |
./pkg/obcs/obcs_apply_uv.F |
116 |
OBCS_APPLY_UV |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_uv.F |
134 |
OBCS_APPLY_UV |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_uvice.F |
128 |
OBCS_APPLY_UVICE |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_uvice.F |
172 |
OBCS_APPLY_UVICE |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_w.F |
60 |
OBCS_APPLY_W |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_w.F |
70 |
OBCS_APPLY_W |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_apply_w.F |
92 |
OBCS_APPLY_W |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
111 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
147 |
OBCS_CALC |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
163 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
283 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
315 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
461 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
498 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc.F |
95 |
OBCS_CALC |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
135 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
140 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
145 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
154 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
159 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
166 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
171 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
180 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
187 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
202 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
235 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
282 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
287 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
292 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
301 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
306 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
313 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
318 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
327 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
334 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
349 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
382 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
602 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_calc_stevens.F |
606 |
OBCS_CALC_STEVENS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_check.F |
64 |
OBCS_CHECK |
CALL PRINT_LIST_I( OB_Ie(1-Oly,bi,bj), 1-Oly, sNy+Oly, INDEX_J, |
./pkg/obcs/obcs_check.F |
69 |
OBCS_CHECK |
CALL PRINT_LIST_I( OB_Iw(1-Oly,bi,bj), 1-Oly, sNy+Oly, INDEX_J, |
./pkg/obcs/obcs_copy_tracer.F |
109 |
OBCS_COPY_TRACER |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_copy_tracer.F |
64 |
OBCS_COPY_TRACER |
DO j = Jobc+1, Jobc+Oly |
./pkg/obcs/obcs_copy_tracer.F |
80 |
OBCS_COPY_TRACER |
DO j = Jobc-Oly, Jobc-1 |
./pkg/obcs/obcs_copy_tracer.F |
93 |
OBCS_COPY_TRACER |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_external_fields_load.F |
267 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
269 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
276 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
278 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
285 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
287 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
294 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
296 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
446 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBEptr0(1-Oly,1,1,1,iTr), iRec0,myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
453 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBWptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
460 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBNptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
467 |
OBCS_EXTERNAL_FIELDS_LOAD |
& OBSptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
502 |
OBCS_EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_external_fields_load.F |
528 |
OBCS_EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_external_fields_load.F |
596 |
OBCS_EXTERNAL_FIELDS_LOAD |
O OBEptr (1-Oly,1,1,1,iTr), |
./pkg/obcs/obcs_external_fields_load.F |
597 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBEptr0(1-Oly,1,1,1,iTr), |
./pkg/obcs/obcs_external_fields_load.F |
598 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBEptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
603 |
OBCS_EXTERNAL_FIELDS_LOAD |
O OBWptr (1-Oly,1,1,1,iTr), |
./pkg/obcs/obcs_external_fields_load.F |
604 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBWptr0(1-Oly,1,1,1,iTr), |
./pkg/obcs/obcs_external_fields_load.F |
605 |
OBCS_EXTERNAL_FIELDS_LOAD |
I OBWptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
./pkg/obcs/obcs_external_fields_load.F |
707 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
_RL fld (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_external_fields_load.F |
708 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
_RL fld0(1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_external_fields_load.F |
709 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
_RL fld1(1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_external_fields_load.F |
719 |
OBCS_EXTERNAL_FIELDS_INTERP_YZ |
DO j=1-Oly,sNy+Oly |
./pkg/obcs/obcs_init_variables.F |
142 |
OBCS_INIT_VARIABLES |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_init_variables.F |
166 |
OBCS_INIT_VARIABLES |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_init_variables.F |
223 |
OBCS_INIT_VARIABLES |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_init_variables.F |
291 |
OBCS_INIT_VARIABLES |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_init_variables.F |
382 |
OBCS_INIT_VARIABLES |
CALL OBCS_COPY_TRACER( theta(1-Olx,1-Oly,1,bi,bj), |
./pkg/obcs/obcs_init_variables.F |
384 |
OBCS_INIT_VARIABLES |
CALL OBCS_COPY_TRACER( salt (1-Olx,1-Oly,1,bi,bj), |
./pkg/obcs/obcs_init_variables.F |
405 |
OBCS_INIT_VARIABLES |
U ptracer(1-Olx,1-Oly,K,bi,bj,iTracer), |
./pkg/obcs/obcs_init_variables.F |
427 |
OBCS_INIT_VARIABLES |
CALL OBCS_COPY_TRACER( pTracer(1-Olx,1-Oly,1,bi,bj,iTracer), |
./pkg/obcs/obcs_init_variables.F |
93 |
OBCS_INIT_VARIABLES |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_prescribe_read.F |
486 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBu (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
487 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBv (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
488 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBt (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
489 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBs (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
490 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBu0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
491 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBv0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
492 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBt0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
493 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBs0 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
494 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBu1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
495 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBv1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
496 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBt1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
497 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBs1 (1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
508 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBa (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
509 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBh (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
510 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBa0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
511 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBh0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
512 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBa1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
513 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBh1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
514 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBsl (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
515 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBsn (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
516 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBsl0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
517 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBsn0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
518 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBsl1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
519 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBsn1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
520 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBuice (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
521 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBvice (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
522 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBuice0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
523 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBvice0 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
524 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBuice1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
525 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBvice1 (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_prescribe_read.F |
530 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBptr (1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/obcs_prescribe_read.F |
531 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBptr0(1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/obcs_prescribe_read.F |
532 |
OBCS_PRESCRIBE_EXF_YZ |
_RL OBptr1(1-Oly:sNy+Oly,Nr,nSx,nSy,PTRACERS_num) |
./pkg/obcs/obcs_readparms.F |
117 |
OBCS_READPARMS |
_RS buf(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_readparms.F |
369 |
OBCS_READPARMS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_readparms.F |
404 |
OBCS_READPARMS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/obcs_readparms.F |
450 |
OBCS_READPARMS |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/orlanski_east.F |
105 |
ORLANSKI_EAST |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/orlanski_init.F |
87 |
ORLANSKI_INIT |
DO J=1-Oly,sNy+Oly |
./pkg/obcs/orlanski_west.F |
107 |
ORLANSKI_WEST |
DO J=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/cpl_ini_vars.F |
50 |
CPL_INI_VARS |
DO J=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
103 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
109 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
120 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
127 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
134 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
146 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
153 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
160 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
168 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
63 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
71 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
78 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
87 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_apply_import.F |
94 |
OCN_APPLY_IMPORT |
DO j=1-Oly,sNy+Oly |
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
42 |
OCN_EXPORT_OCNCONFIG |
DO J=1-Oly,sNy+Oly |
./pkg/offline/offline_fields_load.F |
338 |
OFFLINE_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/offline/offline_fields_load.F |
373 |
OFFLINE_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/offline/offline_fields_load.F |
439 |
LEF_ZERO3 |
DO j=1-Oly,sNy+Oly |
./pkg/offline/offline_fields_load.F |
473 |
LEF_ZERO2 |
DO j=1-Oly,sNy+Oly |
./pkg/offline/offline_init_varia.F |
33 |
OFFLINE_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/offline/offline_init_varia.F |
57 |
OFFLINE_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./model/src/config_check.F |
277 |
CONFIG_CHECK |
IF ( ( Olx.LT.3 .OR. Oly.LT.3 ) .AND. |
./model/src/config_check.F |
287 |
CONFIG_CHECK |
IF ( ( Olx.LT.3 .OR. Oly.LT.3 ) .AND. |
./pkg/opps/opps_interface.F |
95 |
OPPS_INTERFACE |
DO J=1-Oly,sNy+Oly |
./pkg/pp81/pp81_calc_diff.F |
38 |
PP81_CALC_DIFF |
_RL KappaRx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./pkg/pp81/pp81_calc_visc.F |
32 |
PP81_CALC_VISC |
_RL KappaRU(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/pp81/pp81_calc_visc.F |
33 |
PP81_CALC_VISC |
_RL KappaRV(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/pp81/pp81_ri_number.F |
136 |
PP81_RI_NUMBER |
DO J=1-Oly+1,sNy+Oly-1 |
./model/src/convective_adjustment.F |
76 |
CONVECTIVE_ADJUSTMENT |
jMin=1-Oly |
./model/src/convective_adjustment.F |
77 |
CONVECTIVE_ADJUSTMENT |
jMax=sNy+Oly |
./model/src/convective_adjustment_ini.F |
76 |
CONVECTIVE_ADJUSTMENT_INI |
jMin=1-Oly |
./model/src/convective_adjustment_ini.F |
77 |
CONVECTIVE_ADJUSTMENT_INI |
jMax=sNy+Oly |
./model/src/convective_weights.F |
57 |
CONVECTIVE_WEIGHTS |
DO j=1-Oly,sNy+Oly |
./pkg/ptracers/ptracers_advection.F |
102 |
PTRACERS_ADVECTION |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_advection.F |
104 |
PTRACERS_ADVECTION |
O gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_advection.F |
121 |
PTRACERS_ADVECTION |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_advection.F |
122 |
PTRACERS_ADVECTION |
O gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_calc_diff.F |
105 |
PTRACERS_CALC_DIFF |
O KappaRtr(1-Olx,1-Oly,iTr), |
./pkg/ptracers/ptracers_calc_diff.F |
114 |
PTRACERS_CALC_DIFF |
U KappaRtr(1-Olx,1-Oly,iTr), |
./pkg/ptracers/ptracers_calc_diff.F |
123 |
PTRACERS_CALC_DIFF |
U KappaRtr(1-Olx,1-Oly,iTr), |
./pkg/ptracers/ptracers_calc_diff.F |
132 |
PTRACERS_CALC_DIFF |
U KappaRtr(1-Olx,1-Oly,iTr), |
./pkg/ptracers/ptracers_calc_diff.F |
141 |
PTRACERS_CALC_DIFF |
U KappaRtr(1-Olx,1-Oly,iTr), |
./pkg/ptracers/ptracers_calc_diff.F |
149 |
PTRACERS_CALC_DIFF |
DO j = 1-Oly, sNy+Oly |
./pkg/ptracers/ptracers_calc_diff.F |
51 |
PTRACERS_CALC_DIFF |
_RS maskUp(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/ptracers/ptracers_calc_diff.F |
52 |
PTRACERS_CALC_DIFF |
_RL KappaRtr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,PTRACERS_num) |
./pkg/ptracers/ptracers_calc_diff.F |
78 |
PTRACERS_CALC_DIFF |
DO j = 1-Oly, sNy+Oly |
./pkg/ptracers/ptracers_convect.F |
48 |
PTRACERS_CONVECT |
U pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_cycle.F |
49 |
PTRACERS_CYCLE |
U pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_cycle.F |
50 |
PTRACERS_CYCLE |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_debug.F |
45 |
PTRACERS_DEBUG |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |
./pkg/ptracers/ptracers_debug.F |
48 |
PTRACERS_DEBUG |
& gPtr(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |
./pkg/ptracers/ptracers_debug.F |
51 |
PTRACERS_DEBUG |
& gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer),strng,myThid) |
./pkg/ptracers/ptracers_diagnostics_state.F |
70 |
PTRACERS_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( pTracer(1-Olx,1-Oly,1,1,1,iTr), diagName, |
./pkg/ptracers/ptracers_dwnslp_apply.F |
59 |
PTRACERS_DWNSLP_APPLY |
I pTracer(1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_dwnslp_apply.F |
60 |
PTRACERS_DWNSLP_APPLY |
O gPtr(1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_dwnslp_apply.F |
67 |
PTRACERS_DWNSLP_APPLY |
I pTracer(1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_dwnslp_apply.F |
68 |
PTRACERS_DWNSLP_APPLY |
O gPtr(1-Olx,1-Oly,1,1,1,iTr), |
./model/src/convectively_mixtracer.F |
46 |
CONVECTIVELY_MIXTRACER |
DO j=1-Oly,sNy+Oly |
./pkg/ptracers/ptracers_fields_blocking_exchanges.F |
48 |
PTRACERS_FIELDS_BLOCKING_EXCH |
CALL EXCH_3D_RL( pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_fields_blocking_exchanges.F |
61 |
PTRACERS_FIELDS_BLOCKING_EXCH |
CALL OBCS_COPY_TRACER( pTracer(1-Olx,1-Oly,1,bi,bj,iTracer), |
./pkg/ptracers/ptracers_forcing.F |
36 |
PTRACERS_FORCING |
_RL gPtracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ptracers/ptracers_forcing.F |
37 |
PTRACERS_FORCING |
_RL surfPtracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ptracers/ptracers_gterm_blocking_exchanges.F |
41 |
PTRACERS_GTERM_BLOCKING_EXCH |
CALL EXCH_3D_RL( gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_implicit.F |
119 |
PTRACERS_IMPLICIT |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_implicit.F |
120 |
PTRACERS_IMPLICIT |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_implicit.F |
131 |
PTRACERS_IMPLICIT |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_implicit.F |
140 |
PTRACERS_IMPLICIT |
U gPtr(1-Olx,1-Oly,1,bi,bj,iTracer), |
./pkg/ptracers/ptracers_init_varia.F |
93 |
PTRACERS_INIT_VARIA |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),0,myThid) |
./pkg/ptracers/ptracers_init_varia.F |
94 |
PTRACERS_INIT_VARIA |
_EXCH_XYZ_RL(pTracer(1-Olx,1-Oly,1,1,1,iTracer),myThid) |
./pkg/ptracers/ptracers_integrate.F |
143 |
PTRACERS_INTEGRATE |
I KappaRtr(1-Olx,1-Oly,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
144 |
PTRACERS_INTEGRATE |
I gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
145 |
PTRACERS_INTEGRATE |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
153 |
PTRACERS_INTEGRATE |
U rFlx(1-Olx,1-Oly,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
154 |
PTRACERS_INTEGRATE |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
161 |
PTRACERS_INTEGRATE |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
162 |
PTRACERS_INTEGRATE |
I surfaceForcingPTr(1-Olx,1-Oly,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
183 |
PTRACERS_INTEGRATE |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
184 |
PTRACERS_INTEGRATE |
U gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
195 |
PTRACERS_INTEGRATE |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
196 |
PTRACERS_INTEGRATE |
I surfaceForcingPTr(1-Olx,1-Oly,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
204 |
PTRACERS_INTEGRATE |
U gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
209 |
PTRACERS_INTEGRATE |
U gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
219 |
PTRACERS_INTEGRATE |
I pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
220 |
PTRACERS_INTEGRATE |
I gPtr(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_integrate.F |
68 |
PTRACERS_INTEGRATE |
_RL KappaRtr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,PTRACERS_num) |
./pkg/ptracers/ptracers_read_pickup.F |
170 |
PTRACERS_READ_PICKUP |
O pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
172 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
188 |
PTRACERS_READ_PICKUP |
O gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
190 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
203 |
PTRACERS_READ_PICKUP |
O pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
207 |
PTRACERS_READ_PICKUP |
O gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
209 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
211 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
222 |
PTRACERS_READ_PICKUP |
O pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
224 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
232 |
PTRACERS_READ_PICKUP |
O gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
234 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
76 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_read_pickup.F |
83 |
PTRACERS_READ_PICKUP |
CALL EXCH_3D_RL( pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_timeave.F |
61 |
PTRACERS_TIMEAVE |
CALL TIMEAVE_RESET( ptracerFluxtave(1-Olx,1-Oly, 1,1,iTr), |
./pkg/ptracers/ptracers_timeave.F |
63 |
PTRACERS_TIMEAVE |
CALL TIMEAVE_RESET( ptracertave (1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_timeave.F |
82 |
PTRACERS_TIMEAVE |
CALL TIMEAVE_CUMULATE( ptracertave(1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_timeave.F |
83 |
PTRACERS_TIMEAVE |
& pTracer(1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_timeave.F |
94 |
PTRACERS_TIMEAVE |
CALL TIMEAVE_CUMULATE( ptracerFluxtave(1-Olx,1-Oly,1,1,iTr), |
./pkg/ptracers/ptracers_timeave.F |
95 |
PTRACERS_TIMEAVE |
& surfaceForcingPTr(1-Olx,1-Oly,1,1,iTr), |
./pkg/ptracers/ptracers_write_pickup.F |
137 |
PTRACERS_WRITE_PICKUP |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_write_pickup.F |
148 |
PTRACERS_WRITE_PICKUP |
& gpTrNm1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/ptracers/ptracers_write_state.F |
113 |
PTRACERS_WRITE_STATE |
& pTracer(1-Olx,1-Oly,1,1,1,iTracer),iRec,myIter,myThid) |
./pkg/ptracers/ptracers_write_timeave.F |
121 |
PTRACERS_WRITE_TIMEAVE |
& ptracerFluxtave(1-Olx,1-Oly, 1,1,iTr), |
./pkg/ptracers/ptracers_write_timeave.F |
126 |
PTRACERS_WRITE_TIMEAVE |
& ptracertave (1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_write_timeave.F |
68 |
PTRACERS_WRITE_TIMEAVE |
& ptracerFluxtave(1-Olx,1-Oly, 1,1,iTr), |
./pkg/ptracers/ptracers_write_timeave.F |
71 |
PTRACERS_WRITE_TIMEAVE |
& ptracertave (1-Olx,1-Oly,1,1,1,iTr), |
./pkg/ptracers/ptracers_zonal_filt_apply.F |
50 |
PTRACERS_ZONAL_FILT_APPLY |
U pTracer(1-Olx,1-Oly,1,bi,bj,iTr), |
./pkg/rbcs/rbcs_fields_load.F |
194 |
RBCS_FIELDS_LOAD |
& rbcptr0(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/rbcs/rbcs_fields_load.F |
199 |
RBCS_FIELDS_LOAD |
& rbcptr1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/rbcs/rbcs_fields_load.F |
203 |
RBCS_FIELDS_LOAD |
& rbcptr0(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/rbcs/rbcs_fields_load.F |
206 |
RBCS_FIELDS_LOAD |
& rbcptr1(1-Olx,1-Oly,1,1,1,iTracer), |
./pkg/rbcs/rbcs_fields_load.F |
226 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbcptr0(1-Olx,1-Oly,1,1,1,iTracer),myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
227 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbcptr1(1-Olx,1-Oly,1,1,1,iTracer),myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
239 |
RBCS_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/rbcs/rbcs_fields_load.F |
258 |
RBCS_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/rbcs/rbcs_fields_load.F |
78 |
RBCS_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/rbcs/rbcs_fields_load.F |
94 |
RBCS_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/rbcs/rbcs_init_fixed.F |
44 |
RBCS_INIT_FIXED |
DO j=1-Oly,sNy+OLy |
./pkg/rbcs/rbcs_init_fixed.F |
61 |
RBCS_INIT_FIXED |
& RBC_mask(1-Olx,1-Oly,1,1,1,irbc), 0, myThid) |
./pkg/rbcs/rbcs_init_fixed.F |
62 |
RBCS_INIT_FIXED |
CALL EXCH_XYZ_RS( RBC_mask(1-Olx,1-Oly,1,1,1,irbc), myThid ) |
./pkg/rbcs/rbcs_init_fixed.F |
66 |
RBCS_INIT_FIXED |
CALL PLOT_FIELD_XYRS( RBC_mask(1-Olx,1-Oly,1,1,1,irbc), |
./pkg/rbcs/rbcs_init_varia.F |
40 |
RBCS_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/rbcs/rbcs_init_varia.F |
60 |
RBCS_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./model/src/diags_phi_rlow.F |
75 |
DIAGS_PHI_RLOW |
DO j=1-Oly,sNy+Oly |
./pkg/rw/read_fld_xy_rl.F |
16 |
READ_FLD_XY_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/read_fld_xy_rs.F |
16 |
READ_FLD_XY_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/read_fld_xyz_rl.F |
16 |
READ_FLD_XYZ_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/read_fld_xyz_rs.F |
16 |
READ_FLD_XYZ_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/read_rec.F |
156 |
READ_REC_XYZ_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/read_rec.F |
216 |
READ_REC_XYZ_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/read_rec.F |
282 |
READ_REC_3D_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
346 |
READ_REC_3D_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
38 |
READ_REC_XY_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/read_rec.F |
411 |
READ_REC_LEV_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSiz,nSx,nSy) |
./pkg/rw/read_rec.F |
476 |
READ_REC_LEV_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSiz,nSx,nSy) |
./pkg/rw/read_rec.F |
662 |
READ_REC_YZ_RS |
_RS field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
725 |
READ_REC_YZ_RL |
_RL field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/read_rec.F |
97 |
READ_REC_XY_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/write_fld_3d_rl.F |
18 |
WRITE_FLD_3D_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_fld_3d_rs.F |
18 |
WRITE_FLD_3D_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_fld_xy_rl.F |
16 |
WRITE_FLD_XY_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/write_fld_xy_rs.F |
16 |
WRITE_FLD_XY_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/write_fld_xyz_rl.F |
16 |
WRITE_FLD_XYZ_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/write_fld_xyz_rs.F |
16 |
WRITE_FLD_XYZ_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/write_local_rl.F |
36 |
WRITE_LOCAL_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNr) |
./pkg/rw/write_local_rs.F |
36 |
WRITE_LOCAL_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNr) |
./pkg/rw/write_rec.F |
101 |
WRITE_REC_XY_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/write_rec.F |
165 |
WRITE_REC_XY_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/rw/write_rec.F |
229 |
WRITE_REC_XYZ_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/write_rec.F |
293 |
WRITE_REC_XYZ_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/rw/write_rec.F |
362 |
WRITE_REC_3D_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
428 |
WRITE_REC_3D_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
495 |
WRITE_REC_LEV_RS |
_RS field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSiz,nSx,nSy) |
./pkg/rw/write_rec.F |
562 |
WRITE_REC_LEV_RL |
_RL field(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSiz,nSx,nSy) |
./pkg/rw/write_rec.F |
759 |
WRITE_REC_YZ_RS |
_RS field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/rw/write_rec.F |
826 |
WRITE_REC_YZ_RL |
_RL field(1-Oly:sNy+Oly,nNz,nSx,nSy) |
./pkg/salt_plume/salt_plume_calc_depth.F |
105 |
SALT_PLUME_CALC_DEPTH |
DO j=1-Oly,sNy+Oly |
./pkg/salt_plume/salt_plume_calc_depth.F |
126 |
SALT_PLUME_CALC_DEPTH |
DO j=1-Oly,sNy+Oly |
./pkg/salt_plume/salt_plume_calc_depth.F |
59 |
SALT_PLUME_CALC_DEPTH |
DO j=1-Oly,sNy+Oly |
./pkg/salt_plume/salt_plume_calc_depth.F |
69 |
SALT_PLUME_CALC_DEPTH |
DO j=1-Oly,sNy+Oly |
./pkg/salt_plume/salt_plume_calc_depth.F |
83 |
SALT_PLUME_CALC_DEPTH |
DO j=1-Oly,sNy+Oly |
./model/src/do_fields_blocking_exchanges.F |
70 |
DO_FIELDS_BLOCKING_EXCHANGES |
CALL OBCS_COPY_TRACER( theta(1-Olx,1-Oly,1,bi,bj), |
./model/src/do_fields_blocking_exchanges.F |
72 |
DO_FIELDS_BLOCKING_EXCHANGES |
CALL OBCS_COPY_TRACER( salt (1-Olx,1-Oly,1,bi,bj), |
./pkg/salt_plume/salt_plume_init_varia.F |
35 |
SALT_PLUME_INIT_VARIA |
DO j=1-Oly,sNy+OLy |
./pkg/seaice/advect.F |
90 |
ADVECT |
DO J=1-Oly,sNy+Oly |
./pkg/seaice/diffus.F |
74 |
DIFFUS |
DO J=1-Oly,sNy+Oly |
./pkg/seaice/dynsolver.F |
161 |
DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/dynsolver.F |
169 |
DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/dynsolver.F |
178 |
DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/dynsolver.F |
186 |
DYNSOLVER |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/dynsolver.F |
46 |
DYNSOLVER |
_RL phiSurf(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
115 |
LSR |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/lsr.F |
127 |
LSR |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/lsr.F |
176 |
LSR |
DO J=1-Oly,sNy+Oly-1 |
./pkg/seaice/lsr.F |
191 |
LSR |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/lsr.F |
419 |
LSR |
DO J=1-Oly,sNy+Oly-1 |
./pkg/seaice/lsr.F |
434 |
LSR |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/lsr.F |
55 |
LSR |
_RL AU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
56 |
LSR |
_RL BU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
57 |
LSR |
_RL CU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
58 |
LSR |
_RL AV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
59 |
LSR |
_RL BV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
60 |
LSR |
_RL CV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
61 |
LSR |
_RL UERR (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
62 |
LSR |
_RL FXY (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
65 |
LSR |
_RL VRT(1-Oly:sNy+Oly), CVV(1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
67 |
LSR |
_RL etaPlusZeta (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
68 |
LSR |
_RL zetaMinusEta(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
69 |
LSR |
_RL ETAMEAN (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
70 |
LSR |
_RL ZETAMEAN (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
72 |
LSR |
_RL UVRT1 (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
73 |
LSR |
_RL UVRT2 (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
75 |
LSR |
_RL UTMP (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
76 |
LSR |
_RL VTMP (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/lsr.F |
78 |
LSR |
_RL dVdx (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
79 |
LSR |
_RL dVdy (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
80 |
LSR |
_RL dUdx (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
81 |
LSR |
_RL dUdy (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
83 |
LSR |
_RL uz (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/lsr.F |
84 |
LSR |
_RL vz (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_advdiff.F |
100 |
SEAICE_ADVDIFF |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/seaice_advdiff.F |
155 |
SEAICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_advdiff.F |
172 |
SEAICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_advdiff.F |
179 |
SEAICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_advdiff.F |
366 |
SEAICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_advdiff.F |
77 |
SEAICE_ADVDIFF |
_RL gFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_advdiff.F |
92 |
SEAICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_advection.F |
318 |
SEAICE_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_calc_strainrates.F |
104 |
SEAICE_CALC_STRAINRATES |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_calc_strainrates.F |
112 |
SEAICE_CALC_STRAINRATES |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_calc_strainrates.F |
41 |
SEAICE_CALC_STRAINRATES |
_RL uFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_strainrates.F |
42 |
SEAICE_CALC_STRAINRATES |
_RL vFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_strainrates.F |
74 |
SEAICE_CALC_STRAINRATES |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/seaice_calc_strainrates.F |
81 |
SEAICE_CALC_STRAINRATES |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/seaice_calc_strainrates.F |
89 |
SEAICE_CALC_STRAINRATES |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/seaice_calc_strainrates.F |
97 |
SEAICE_CALC_STRAINRATES |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_calc_viscosities.F |
109 |
SEAICE_CALC_VISCOSITIES |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/seaice/seaice_calc_viscosities.F |
46 |
SEAICE_CALC_VISCOSITIES |
_RL zMin (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
47 |
SEAICE_CALC_VISCOSITIES |
_RL zMax (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
48 |
SEAICE_CALC_VISCOSITIES |
_RL hEffM (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
50 |
SEAICE_CALC_VISCOSITIES |
_RL press0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
51 |
SEAICE_CALC_VISCOSITIES |
_RL press (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
53 |
SEAICE_CALC_VISCOSITIES |
_RL eta (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
55 |
SEAICE_CALC_VISCOSITIES |
_RL zeta (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_calc_viscosities.F |
65 |
SEAICE_CALC_VISCOSITIES |
_RL e12C (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_calc_viscosities.F |
78 |
SEAICE_CALC_VISCOSITIES |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/seaice/seaice_calc_viscosities.F |
84 |
SEAICE_CALC_VISCOSITIES |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/seaice/seaice_check.F |
291 |
SEAICE_CHECK |
IF ( Olx.LT.3 .OR. Oly.LT.3 ) THEN |
./pkg/seaice/seaice_diffusion.F |
75 |
SEAICE_DIFFUSION |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_diffusion.F |
92 |
SEAICE_DIFFUSION |
DO j=1-Oly,sNy+Oly-1 |
./pkg/seaice/seaice_dynsolver.F |
115 |
SEAICE_DYNSOLVER |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
145 |
SEAICE_DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
174 |
SEAICE_DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
182 |
SEAICE_DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
191 |
SEAICE_DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
199 |
SEAICE_DYNSOLVER |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
211 |
SEAICE_DYNSOLVER |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
50 |
SEAICE_DYNSOLVER |
_RL phiSurf(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_dynsolver.F |
62 |
SEAICE_DYNSOLVER |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_dynsolver.F |
99 |
SEAICE_DYNSOLVER |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_evp.F |
124 |
SEAICE_EVP |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_evp.F |
144 |
SEAICE_EVP |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_evp.F |
188 |
SEAICE_EVP |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_evp.F |
200 |
SEAICE_EVP |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_evp.F |
535 |
SEAICE_EVP |
DO J=1-Oly,sNy+Oly |
./pkg/seaice/seaice_freedrift.F |
179 |
SEAICE_FREEDRIFT |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_freedrift.F |
47 |
SEAICE_FREEDRIFT |
_RL uice_cntr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_freedrift.F |
48 |
SEAICE_FREEDRIFT |
_RL vice_cntr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_get_dynforcing.F |
106 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_get_dynforcing.F |
116 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_get_dynforcing.F |
138 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_get_dynforcing.F |
157 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_get_dynforcing.F |
198 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly+1,sNy+Oly |
./pkg/seaice/seaice_get_dynforcing.F |
228 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_get_dynforcing.F |
86 |
SEAICE_GET_DYNFORCING |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_init_varia.F |
211 |
SEAICE_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_init_varia.F |
424 |
SEAICE_INIT_VARIA |
CALL OBCS_COPY_TRACER( HEFF(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_init_varia.F |
426 |
SEAICE_INIT_VARIA |
CALL OBCS_COPY_TRACER( AREA(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_init_varia.F |
428 |
SEAICE_INIT_VARIA |
CALL OBCS_COPY_TRACER( HSNOW(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_init_varia.F |
431 |
SEAICE_INIT_VARIA |
CALL OBCS_COPY_TRACER( HSALT(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_init_varia.F |
435 |
SEAICE_INIT_VARIA |
CALL OBCS_COPY_TRACER( ICEAGE(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_lsr.F |
101 |
SEAICE_LSR |
_RL URT (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_lsr.F |
102 |
SEAICE_LSR |
_RL CUU (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_lsr.F |
103 |
SEAICE_LSR |
_RL VRT (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_lsr.F |
104 |
SEAICE_LSR |
_RL CVV (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_lsr.F |
105 |
SEAICE_LSR |
_RL uTmp (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
106 |
SEAICE_LSR |
_RL vTmp (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
73 |
SEAICE_LSR |
_RL UXX (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
74 |
SEAICE_LSR |
_RL UYY (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
75 |
SEAICE_LSR |
_RL UXM (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
76 |
SEAICE_LSR |
_RL UYM (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
77 |
SEAICE_LSR |
_RL VXX (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
78 |
SEAICE_LSR |
_RL VYY (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
79 |
SEAICE_LSR |
_RL VXM (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
80 |
SEAICE_LSR |
_RL VYM (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
82 |
SEAICE_LSR |
_RL AU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
83 |
SEAICE_LSR |
_RL BU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
84 |
SEAICE_LSR |
_RL CU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
85 |
SEAICE_LSR |
_RL AV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
869 |
SEAICE_LSR |
DO J=1-Oly,sNy+Oly |
./pkg/seaice/seaice_lsr.F |
86 |
SEAICE_LSR |
_RL BV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
87 |
SEAICE_LSR |
_RL CV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
88 |
SEAICE_LSR |
_RL FXY (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
890 |
SEAICE_LSR |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_lsr.F |
90 |
SEAICE_LSR |
_RL UVRT1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
91 |
SEAICE_LSR |
_RL UVRT2(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
93 |
SEAICE_LSR |
_RL etaPlusZeta (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
94 |
SEAICE_LSR |
_RL zetaMinusEta(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
95 |
SEAICE_LSR |
_RL etaMeanZ (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/seaice/seaice_lsr.F |
97 |
SEAICE_LSR |
_RL sig11(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_lsr.F |
98 |
SEAICE_LSR |
_RL sig22(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_lsr.F |
99 |
SEAICE_LSR |
_RL sig12(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/seaice/seaice_map_thsice.F |
45 |
SEAICE_MAP_THSICE |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_model.F |
114 |
SEAICE_MODEL |
DO j=1-Oly,sNy+Oly |
./pkg/seaice/seaice_model.F |
261 |
SEAICE_MODEL |
CALL OBCS_COPY_TRACER( HEFF(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_model.F |
263 |
SEAICE_MODEL |
CALL OBCS_COPY_TRACER( AREA(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_model.F |
265 |
SEAICE_MODEL |
CALL OBCS_COPY_TRACER( HSNOW(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_model.F |
268 |
SEAICE_MODEL |
CALL OBCS_COPY_TRACER( HSALT(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_model.F |
272 |
SEAICE_MODEL |
CALL OBCS_COPY_TRACER( IceAge(1-Olx,1-Oly,bi,bj), |
./pkg/seaice/seaice_model.F |
91 |
SEAICE_MODEL |
DO j=1-Oly,sNy+Oly |
./model/src/dynamics.F |
183 |
DYNAMICS |
_RL dPhiHydX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/dynamics.F |
184 |
DYNAMICS |
_RL dPhiHydY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/dynamics.F |
189 |
DYNAMICS |
_RL KappaRU (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/dynamics.F |
190 |
DYNAMICS |
_RL KappaRV (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/shap_filt/shap_filt_computvort.F |
63 |
SHAP_FILT_COMPUTVORT |
DO j=1-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_computvort.F |
71 |
SHAP_FILT_COMPUTVORT |
DO j=2-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_relvort3.F |
50 |
SHAP_FILT_RELVORT3 |
DO J=1-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_relvort3.F |
57 |
SHAP_FILT_RELVORT3 |
DO J=2-Oly,sNy+Oly |
./model/src/external_fields_load.F |
137 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
175 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
223 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
231 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
239 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
247 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
256 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
264 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
272 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
281 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./model/src/external_fields_load.F |
291 |
EXTERNAL_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_tracer_s2.F |
118 |
SHAP_FILT_TRACER_S2 |
& tmpFld(1-Olx,1-Oly,k,bi,bj), |
./pkg/shap_filt/shap_filt_tracer_s2.F |
149 |
SHAP_FILT_TRACER_S2 |
& tmpFld(1-Olx,1-Oly,k,bi,bj), |
./pkg/shap_filt/shap_filt_tracer_s2.F |
81 |
SHAP_FILT_TRACER_S2 |
DO j=1-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_tracer_s4.F |
58 |
SHAP_FILT_TRACER_S4 |
DO J=1-OLy,sNy+Oly |
./pkg/shap_filt/shap_filt_uv_s2.F |
137 |
SHAP_FILT_UV_S2 |
DO j=1-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
154 |
SHAP_FILT_UV_S2 |
DO j=1-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
159 |
SHAP_FILT_UV_S2 |
DO j=2-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_uv_s2.F |
171 |
SHAP_FILT_UV_S2 |
DO j=2-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
180 |
SHAP_FILT_UV_S2 |
DO j=2-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
189 |
SHAP_FILT_UV_S2 |
DO j=2-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
208 |
SHAP_FILT_UV_S2 |
DO j=2-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
224 |
SHAP_FILT_UV_S2 |
DO j=2-Oly,sNy+Oly-1 |
./pkg/shap_filt/shap_filt_uv_s2.F |
78 |
SHAP_FILT_UV_S2 |
DO j=1-Oly,sNy+Oly |
./pkg/shap_filt/shap_filt_uv_s2.F |
88 |
SHAP_FILT_UV_S2 |
DO j=1-Oly,sNy+Oly |
./pkg/shelfice/shelfice_thermodynamics.F |
108 |
SHELFICE_THERMODYNAMICS |
DO J = 1-Oly,sNy+Oly |
./pkg/shelfice/shelfice_u_drag.F |
72 |
SHELFICE_U_DRAG |
DO j=1-Oly,sNy+Oly-1 |
./pkg/shelfice/shelfice_update_masks.F |
56 |
SHELFICE_UPDATE_MASKS |
DO j=1-Oly,sNy+Oly |
./pkg/shelfice/shelfice_update_masks.F |
88 |
SHELFICE_UPDATE_MASKS |
DO J=1-Oly,sNy+Oly |
./pkg/shelfice/shelfice_v_drag.F |
72 |
SHELFICE_V_DRAG |
DO j=1-Oly+1,sNy+Oly-1 |
./pkg/smooth/SMOOTH.h |
28 |
NO PROCEDURE |
& smooth3D_Lx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
29 |
NO PROCEDURE |
& smooth3D_Ly(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
30 |
NO PROCEDURE |
& smooth3D_Lz(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
31 |
NO PROCEDURE |
& smooth3Dnorm (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/SMOOTH.h |
38 |
NO PROCEDURE |
& smooth2D_Lx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
39 |
NO PROCEDURE |
& smooth2D_Ly(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
40 |
NO PROCEDURE |
& smooth2Dnorm (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/smooth/SMOOTH.h |
43 |
NO PROCEDURE |
& smooth3D_kappaR (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
55 |
NO PROCEDURE |
& smooth2D_Kux (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy), |
./pkg/smooth/SMOOTH.h |
56 |
NO PROCEDURE |
& smooth2D_Kvy (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./model/src/find_alpha.F |
312 |
FIND_BETA |
_RL betaLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
320 |
FIND_BETA |
_RL locPres(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
321 |
FIND_BETA |
_RL rhoP0 (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
322 |
FIND_BETA |
_RL bulkMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
324 |
FIND_BETA |
_RL rhoDen (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
325 |
FIND_BETA |
_RL rhoLoc (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
49 |
FIND_ALPHA |
_RL alphaLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
58 |
FIND_ALPHA |
_RL locPres(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
59 |
FIND_ALPHA |
_RL rhoP0 (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
60 |
FIND_ALPHA |
_RL bulkMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
62 |
FIND_ALPHA |
_RL rhoDen (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_alpha.F |
63 |
FIND_ALPHA |
_RL rhoLoc (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/smooth/smooth_diff3d.F |
33 |
SMOOTH_DIFF3D |
_RL fld_in(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_diff3d.F |
34 |
SMOOTH_DIFF3D |
_RL fld_tmp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_diff3d.F |
35 |
SMOOTH_DIFF3D |
_RL gT_in(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_diff3d.F |
36 |
SMOOTH_DIFF3D |
_RL gTm1_in(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/find_rho.F |
252 |
FIND_RHOP0 |
_RL rhoP0(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
340 |
FIND_BULKMOD |
_RL locPres(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
343 |
FIND_BULKMOD |
_RL bulkMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
449 |
FIND_RHONUM |
_RL locPres(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
452 |
FIND_RHONUM |
_RL rhoNum (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
515 |
FIND_RHODEN |
_RL locPres(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
518 |
FIND_RHODEN |
_RL rhoDen (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
55 |
FIND_RHO_2D |
_RL rhoLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
63 |
FIND_RHO_2D |
_RL locPres(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
64 |
FIND_RHO_2D |
_RL rhoP0 (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
65 |
FIND_RHO_2D |
_RL bulkMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
66 |
FIND_RHO_2D |
_RL rhoNum (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/find_rho.F |
67 |
FIND_RHO_2D |
_RL rhoDen (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/smooth/smooth_impldiff.F |
44 |
SMOOTH_IMPLDIFF |
_RL KappaRX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/smooth/smooth_impldiff.F |
45 |
SMOOTH_IMPLDIFF |
_RS recip_hFac(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_impldiff.F |
46 |
SMOOTH_IMPLDIFF |
_RL gXnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_impldiff.F |
53 |
SMOOTH_IMPLDIFF |
_RL gYnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_impldiff.F |
54 |
SMOOTH_IMPLDIFF |
_RL a(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/smooth/smooth_impldiff.F |
55 |
SMOOTH_IMPLDIFF |
_RL b(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/smooth/smooth_impldiff.F |
56 |
SMOOTH_IMPLDIFF |
_RL c(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/smooth/smooth_impldiff.F |
57 |
SMOOTH_IMPLDIFF |
_RL bet(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/smooth/smooth_impldiff.F |
58 |
SMOOTH_IMPLDIFF |
_RL gam(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/smooth/smooth_rhs.F |
69 |
SMOOTH_RHS |
_RL fld_in(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/smooth/smooth_rhs.F |
70 |
SMOOTH_RHS |
_RL gt_in(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/freesurf_rescale_g.F |
45 |
FREESURF_RESCALE_G |
DO j=1-Oly,sNy+Oly |
./model/src/freesurf_rescale_g.F |
54 |
FREESURF_RESCALE_G |
DO j=1-Oly,sNy+Oly |
./model/src/freesurf_rescale_g.F |
65 |
FREESURF_RESCALE_G |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
185 |
THSICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
191 |
THSICE_ADVDIFF |
DO j=1-Oly+1,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
199 |
THSICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
217 |
THSICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
225 |
THSICE_ADVDIFF |
U iceVol, snowHeight(1-Olx,1-Oly,bi,bj), |
./pkg/thsice/thsice_advdiff.F |
234 |
THSICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
243 |
THSICE_ADVDIFF |
U iceVol, iceHeight(1-Olx,1-Oly,bi,bj), |
./pkg/thsice/thsice_advdiff.F |
315 |
THSICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
323 |
THSICE_ADVDIFF |
U iceVol, Qice1(1-Olx,1-Oly,bi,bj), |
./pkg/thsice/thsice_advdiff.F |
352 |
THSICE_ADVDIFF |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advdiff.F |
360 |
THSICE_ADVDIFF |
U iceVol, Qice2(1-Olx,1-Oly,bi,bj), |
./pkg/thsice/thsice_advdiff.F |
90 |
THSICE_ADVDIFF |
_RL iceVol (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_advdiff.F |
91 |
THSICE_ADVDIFF |
_RL oldVol (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_advection.F |
217 |
THSICE_ADVECTION |
maskLocS(i,1-Oly) = 0. |
./pkg/thsice/thsice_advection.F |
294 |
THSICE_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advection.F |
313 |
THSICE_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advection.F |
322 |
THSICE_ADVECTION |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_advection.F |
528 |
THSICE_ADVECTION |
DO j=2-Oly,sNy+Oly |
./pkg/thsice/thsice_advection.F |
537 |
THSICE_ADVECTION |
DO j=2-Oly,sNy+Oly |
./pkg/thsice/thsice_calc_thickn.F |
139 |
THSICE_CALC_THICKN |
_RL qicen(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nlyr) |
./pkg/thsice/thsice_calc_thickn.F |
173 |
THSICE_CALC_THICKN |
_RL evapLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
174 |
THSICE_CALC_THICKN |
_RL Fbot (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
175 |
THSICE_CALC_THICKN |
_RL etop (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
176 |
THSICE_CALC_THICKN |
_RL ebot (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
177 |
THSICE_CALC_THICKN |
_RL etope (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
178 |
THSICE_CALC_THICKN |
_RL ebote (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
179 |
THSICE_CALC_THICKN |
_RL esurp (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
181 |
THSICE_CALC_THICKN |
_RL hnew (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nlyr) |
./pkg/thsice/thsice_calc_thickn.F |
189 |
THSICE_CALC_THICKN |
_RL mwater0 (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
190 |
THSICE_CALC_THICKN |
_RL msalt0 (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
210 |
THSICE_CALC_THICKN |
_RL enFrcMlt(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
212 |
THSICE_CALC_THICKN |
_RL enFrcFrz(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/thsice/thsice_calc_thickn.F |
273 |
THSICE_CALC_THICKN |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_calc_thickn.F |
291 |
THSICE_CALC_THICKN |
DO j=1-Oly,sNy+Oly |
./pkg/thsice/thsice_get_exf.F |
199 |
THSICE_GET_EXF |
DO j = 1-Oly,sNy+Oly |
./model/src/grad_sigma.F |
36 |
GRAD_SIGMA |
_RL rhoK(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/grad_sigma.F |
37 |
GRAD_SIGMA |
_RL sigKm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/grad_sigma.F |
38 |
GRAD_SIGMA |
_RL sigKp1(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/grad_sigma.F |
39 |
GRAD_SIGMA |
_RL sigmaX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/grad_sigma.F |
40 |
GRAD_SIGMA |
_RL sigmaY(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/grad_sigma.F |
41 |
GRAD_SIGMA |
_RL sigmaR(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/grad_sigma.F |
48 |
GRAD_SIGMA |
_RL rhoLoc(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/grad_sigma.F |
52 |
GRAD_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/grad_sigma.F |
65 |
GRAD_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/grad_sigma.F |
80 |
GRAD_SIGMA |
DO j=1-Oly+1,sNy+Oly |
./model/src/grad_sigma.F |
89 |
GRAD_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/grad_sigma.F |
95 |
GRAD_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/impldiff.F |
54 |
IMPLDIFF |
_RL KappaRX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/impldiff.F |
55 |
IMPLDIFF |
_RS recip_hFac(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/impldiff.F |
56 |
IMPLDIFF |
_RL gXnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/impldiff.F |
63 |
IMPLDIFF |
_RL gYnm1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/impldiff.F |
64 |
IMPLDIFF |
_RL a(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/impldiff.F |
65 |
IMPLDIFF |
_RL b(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/impldiff.F |
66 |
IMPLDIFF |
_RL c(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/impldiff.F |
67 |
IMPLDIFF |
_RL bet(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/impldiff.F |
68 |
IMPLDIFF |
_RL gam(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/impldiff.F |
78 |
IMPLDIFF |
_RL df (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_cartesian_grid.F |
114 |
INI_CARTESIAN_GRID |
DO j=1, Oly |
./model/src/ini_cartesian_grid.F |
115 |
INI_CARTESIAN_GRID |
yG0 = yG0 - delY( 1+MOD(Oly*Ny-1+jG-j,Ny) ) |
./model/src/ini_cartesian_grid.F |
119 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly +1 |
./model/src/ini_cartesian_grid.F |
127 |
INI_CARTESIAN_GRID |
yGloc(i,1-Oly) = yG0 |
./model/src/ini_cartesian_grid.F |
128 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
135 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
143 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
154 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
162 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
172 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
184 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
191 |
INI_CARTESIAN_GRID |
DO j=1-Oly+1,sNy+Oly ! NOTE range |
./model/src/ini_cartesian_grid.F |
198 |
INI_CARTESIAN_GRID |
DO j=1-Oly+1,sNy+Oly ! NOTE range |
./model/src/ini_cartesian_grid.F |
210 |
INI_CARTESIAN_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cartesian_grid.F |
70 |
INI_CARTESIAN_GRID |
_RL xGloc(1-Olx:sNx+Olx+1,1-Oly:sNy+Oly+1) |
./model/src/ini_cartesian_grid.F |
71 |
INI_CARTESIAN_GRID |
_RL yGloc(1-Olx:sNx+Olx+1,1-Oly:sNy+Oly+1) |
./model/src/ini_cartesian_grid.F |
76 |
INI_CARTESIAN_GRID |
jGl(j,bj) = 1+MOD(myYGlobalLo-1+(bj-1)*sNy+j+Oly*Ny-1,Ny) |
./pkg/zonal_filt/ZONAL_FILT.h |
41 |
NO PROCEDURE |
_RL ampFactor( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, nSx, nSy ) |
./pkg/zonal_filt/ZONAL_FILT.h |
42 |
NO PROCEDURE |
_RL ampFactorV( 1-Olx:sNx+Olx, 1-Oly:sNy+Oly, nSx, nSy ) |
./pkg/zonal_filt/zonal_filt_init.F |
83 |
ZONAL_FILT_INIT |
DO j=1-oLy,sNy+Oly |
./pkg/zonal_filt/zonal_filter.F |
42 |
ZONAL_FILTER |
_RS fieldMask(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize) |
./model/src/ini_cori.F |
111 |
INI_CORI |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cori.F |
62 |
INI_CORI |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cori.F |
78 |
INI_CORI |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cori.F |
92 |
INI_CORI |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
112 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
120 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
170 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
176 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
184 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
191 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
42 |
GAD_IMPLICIT_R |
_RL kappaRX(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
43 |
GAD_IMPLICIT_R |
_RL wVel (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
44 |
GAD_IMPLICIT_R |
_RL tracer (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
45 |
GAD_IMPLICIT_R |
_RL gTracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
67 |
GAD_IMPLICIT_R |
_RL a5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
68 |
GAD_IMPLICIT_R |
_RL b5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
69 |
GAD_IMPLICIT_R |
_RL c5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
70 |
GAD_IMPLICIT_R |
_RL d5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
71 |
GAD_IMPLICIT_R |
_RL e5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
72 |
GAD_IMPLICIT_R |
_RL wFld (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
73 |
GAD_IMPLICIT_R |
_RL rTrans (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
74 |
GAD_IMPLICIT_R |
_RL rTransKp1(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
75 |
GAD_IMPLICIT_R |
_RL localTijk(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
82 |
GAD_IMPLICIT_R |
_RL df (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
95 |
GAD_IMPLICIT_R |
DO j=1-Oly,sNy+Oly |
./model/src/ini_curvilinear_grid.F |
68 |
INI_CURVILINEAR_GRID |
DO j=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F |
108 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F |
137 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F |
180 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F |
56 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F |
83 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./verification/OpenAD/code_oad_all/ini_linear_phisurf.F |
95 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
122 |
INI_CYLINDER_GRID |
DO j=1, Oly |
./model/src/ini_cylinder_grid.F |
123 |
INI_CYLINDER_GRID |
yG0 = yG0 - delY( 1+mod(Oly*Ny-1+jG-j,Ny) ) |
./model/src/ini_cylinder_grid.F |
127 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly +1 |
./model/src/ini_cylinder_grid.F |
134 |
INI_CYLINDER_GRID |
yGloc(i,1-Oly) = yG0 |
./model/src/ini_cylinder_grid.F |
135 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
141 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
149 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
160 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
170 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
182 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
194 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
202 |
INI_CYLINDER_GRID |
DO j=1-Oly+1,sNy+Oly ! NOTE range |
./model/src/ini_cylinder_grid.F |
210 |
INI_CYLINDER_GRID |
DO j=1-Oly+1,sNy+Oly ! NOTE range |
./model/src/ini_cylinder_grid.F |
219 |
INI_CYLINDER_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_cylinder_grid.F |
60 |
INI_CYLINDER_GRID |
_RL xGloc(1-Olx:sNx+Olx+1,1-Oly:sNy+Oly+1) |
./model/src/ini_cylinder_grid.F |
61 |
INI_CYLINDER_GRID |
_RL yGloc(1-Olx:sNx+Olx+1,1-Oly:sNy+Oly+1) |
./model/src/ini_cylinder_grid.F |
84 |
INI_CYLINDER_GRID |
jGl(j,bj) = 1+MOD(myYGlobalLo-1+(bj-1)*sNy+j+Oly*Ny-1,Ny) |
./model/src/ini_depths.F |
230 |
INI_DEPTHS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_depths.F |
252 |
INI_DEPTHS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_depths.F |
77 |
INI_DEPTHS |
DO j=1-Oly,sNy+Oly |
./verification/advect_cs/code/ini_vel.F |
55 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./verification/advect_cs/code/ini_vel.F |
56 |
INI_VEL |
jp1=MIN(j+1,sNy+Oly) |
./verification/advect_cs/code/ini_vel.F |
84 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_salt.F |
56 |
INI_SALT |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_salt.F |
63 |
INI_SALT |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_salt.F |
88 |
INI_SALT |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_theta.F |
137 |
INI_THETA |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_theta.F |
57 |
INI_THETA |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_theta.F |
92 |
INI_THETA |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_vel.F |
49 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./verification/advect_xy/code/ini_vel.F |
74 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./model/src/ini_dynvars.F |
48 |
INI_DYNVARS |
DO J=1-Oly,sNy+Oly |
./model/src/ini_dynvars.F |
87 |
INI_DYNVARS |
DO J=1-Oly,sNy+Oly |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
230 |
INI_DEPTHS |
DO j=1-Oly,sNy+Oly |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
252 |
INI_DEPTHS |
DO j=1-Oly,sNy+Oly |
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
77 |
INI_DEPTHS |
DO j=1-Oly,sNy+Oly |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
36 |
MOM_VI_HFACZ_DISS |
hFacZ(i,1-Oly)=0. |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
37 |
MOM_VI_HFACZ_DISS |
r_hFacZ(i,1-Oly)=0. |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
40 |
MOM_VI_HFACZ_DISS |
DO j=2-Oly,sNy+Oly |
./model/src/ini_eos.F |
310 |
EOS_CHECK |
_RL rhoLoc (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_eos.F |
311 |
EOS_CHECK |
_RL bulkMod(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
39 |
MOM_VI_MASK_VORT3 |
DO j=2-Oly,sNy+Oly |
./model/src/ini_forcing.F |
133 |
INI_FORCING |
DO j=1-Oly,sNy+Oly |
./model/src/ini_forcing.F |
93 |
INI_FORCING |
DO j=1-Oly,sNy+Oly |
./model/src/ini_hfac.F |
41 |
INI_HFAC |
DO J=1-Oly,sNy+Oly |
./verification/dome/code/obcs_calc.F |
130 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./verification/dome/code/obcs_calc.F |
98 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./model/src/ini_linear_phisurf.F |
145 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_linear_phisurf.F |
157 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_linear_phisurf.F |
170 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_linear_phisurf.F |
198 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_linear_phisurf.F |
239 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_linear_phisurf.F |
67 |
INI_LINEAR_PHISURF |
DO J=1-Oly,sNy+Oly |
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
53 |
INI_SALT |
_RL temperature(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
54 |
INI_SALT |
_RL rhum(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
55 |
INI_SALT |
_RL qstar(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
87 |
INI_SALT |
DO J=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
116 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
135 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
175 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
216 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
236 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
246 |
INI_MASKS_ETC |
DO j=2-Oly,sNy+oly |
./model/src/ini_masks_etc.F |
255 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
259 |
INI_MASKS_ETC |
j = 1-Oly |
./model/src/ini_masks_etc.F |
264 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
272 |
INI_MASKS_ETC |
DO j=2-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
293 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
306 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
349 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
53 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_masks_etc.F |
95 |
INI_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_mixing.F |
50 |
INI_MIXING |
DO j = 1-Oly, sNy+Oly |
./model/src/ini_mixing.F |
70 |
INI_MIXING |
DO j = 1-Oly, sNy+Oly |
./model/src/ini_nh_fields.F |
127 |
INI_NH_FIELDS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_nh_vars.F |
46 |
INI_NH_VARS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_nh_vars.F |
52 |
INI_NH_VARS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_nlfs_vars.F |
125 |
INI_NLFS_VARS |
DO j=2-Oly,sNy+Oly |
./model/src/ini_nlfs_vars.F |
57 |
INI_NLFS_VARS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_nlfs_vars.F |
68 |
INI_NLFS_VARS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_nlfs_vars.F |
83 |
INI_NLFS_VARS |
DO j=1-Oly,sNy+Oly |
./model/src/ini_pressure.F |
46 |
INI_PRESSURE |
_RL PhiHydF (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_pressure.F |
47 |
INI_PRESSURE |
_RL PhiHydC (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_pressure.F |
48 |
INI_PRESSURE |
_RL dPhiHydX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_pressure.F |
49 |
INI_PRESSURE |
_RL dPhiHydY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_pressure.F |
50 |
INI_PRESSURE |
_RL oldPhi (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/ini_psurf.F |
53 |
INI_PSURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_psurf.F |
71 |
INI_PSURF |
DO J=1-Oly,sNy+Oly |
./model/src/ini_psurf.F |
86 |
INI_PSURF |
DO j=1-Oly,sNy+Oly |
./model/src/ini_salt.F |
58 |
INI_SALT |
DO j=1-Oly,sNy+Oly |
./model/src/ini_salt.F |
91 |
INI_SALT |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
102 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
135 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
140 |
INI_SIGMA_HFAC |
j = 1-Oly |
./model/src/ini_sigma_hfac.F |
146 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
169 |
INI_SIGMA_HFAC |
DO j=2-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
203 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
216 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
227 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
238 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
69 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_sigma_hfac.F |
83 |
INI_SIGMA_HFAC |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
124 |
INI_SPHERICAL_POLAR_GRID |
DO j=1, Oly |
./model/src/ini_spherical_polar_grid.F |
125 |
INI_SPHERICAL_POLAR_GRID |
yG0 = yG0 - delY( 1+MOD(Oly*Ny-1+jG-j,Ny) ) |
./model/src/ini_spherical_polar_grid.F |
129 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly +1 |
./model/src/ini_spherical_polar_grid.F |
137 |
INI_SPHERICAL_POLAR_GRID |
yGloc(i,1-Oly) = yG0 |
./model/src/ini_spherical_polar_grid.F |
138 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
145 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
153 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
164 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
183 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
201 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
213 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
229 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly+1,sNy+Oly ! NOTE range |
./model/src/ini_spherical_polar_grid.F |
243 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly+1,sNy+Oly ! NOTE range |
./model/src/ini_spherical_polar_grid.F |
255 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
272 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
286 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
305 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
318 |
INI_SPHERICAL_POLAR_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/ini_spherical_polar_grid.F |
62 |
INI_SPHERICAL_POLAR_GRID |
_RL xGloc(1-Olx:sNx+Olx+1,1-Oly:sNy+Oly+1) |
./model/src/ini_spherical_polar_grid.F |
63 |
INI_SPHERICAL_POLAR_GRID |
_RL yGloc(1-Olx:sNx+Olx+1,1-Oly:sNy+Oly+1) |
./model/src/ini_spherical_polar_grid.F |
86 |
INI_SPHERICAL_POLAR_GRID |
jGl(j,bj) = 1+MOD(myYGlobalLo-1+(bj-1)*sNy+j+Oly*Ny-1,Ny) |
./verification/hs94.1x64x5/code/ini_theta.F |
99 |
INI_THETA |
DO J=1-Oly,sNy+Oly |
./model/src/ini_theta.F |
137 |
INI_THETA |
DO j=1-Oly,sNy+Oly |
./model/src/ini_theta.F |
59 |
INI_THETA |
DO j=1-Oly,sNy+Oly |
./model/src/ini_theta.F |
92 |
INI_THETA |
DO j=1-Oly,sNy+Oly |
./verification/hs94.1x64x5/code_ad/ini_theta.F |
99 |
INI_THETA |
DO J=1-Oly,sNy+Oly |
./model/src/ini_vel.F |
49 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./model/src/ini_vel.F |
73 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./verification/hs94.cs-32x32x5/code/ini_theta.F |
99 |
INI_THETA |
DO J=1-Oly,sNy+Oly |
./verification/internal_wave/code/obcs_calc.F |
105 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./verification/internal_wave/code/obcs_calc.F |
85 |
OBCS_CALC |
DO J=1-Oly,sNy+Oly |
./model/src/integr_continuity.F |
182 |
INTEGR_CONTINUITY |
DO j=1-Oly,sNy+Oly |
./model/src/integr_continuity.F |
45 |
INTEGR_CONTINUITY |
_RL uFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/integr_continuity.F |
46 |
INTEGR_CONTINUITY |
_RL vFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/integr_continuity.F |
59 |
INTEGR_CONTINUITY |
_RL uTrans(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/integr_continuity.F |
60 |
INTEGR_CONTINUITY |
_RL vTrans(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/integr_continuity.F |
61 |
INTEGR_CONTINUITY |
_RL hDivFlow(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/integr_continuity.F |
82 |
INTEGR_CONTINUITY |
DO j=1-Oly,sNy+Oly |
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
43 |
INI_PSURF |
DO J=1-Oly,sNy+Oly |
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
63 |
INI_PSURF |
DO J=1-Oly,sNy+Oly |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
52 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
53 |
INI_VEL |
jp1=MIN(j+1,sNy+Oly) |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
89 |
INI_VEL |
DO j=1-Oly,sNy+Oly |
./verification/tutorial_global_oce_latlon/code/ptracers_forcing.F |
40 |
PTRACERS_FORCING |
_RL gPtracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./verification/tutorial_global_oce_latlon/code/ptracers_forcing.F |
41 |
PTRACERS_FORCING |
_RL surfPtracer(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
135 |
INI_FORCING |
DO j=1-Oly,sNy+Oly |
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
95 |
INI_FORCING |
DO j=1-Oly,sNy+Oly |
./model/src/pre_cg3d.F |
65 |
PRE_CG3D |
_RL uf(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/pre_cg3d.F |
66 |
PRE_CG3D |
_RL vf(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/pre_cg3d.F |
68 |
PRE_CG3D |
_RL tmpVar(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/pressure_for_eos.F |
57 |
PRESSURE_FOR_EOS |
DO j=1-Oly,sNy+Oly |
./model/src/pressure_for_eos.F |
66 |
PRESSURE_FOR_EOS |
DO j=1-Oly,sNy+Oly |
./model/src/pressure_for_eos.F |
76 |
PRESSURE_FOR_EOS |
DO j=1-Oly,sNy+Oly |
./model/src/read_pickup.F |
190 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, guNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/read_pickup.F |
192 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, guNm(1-Olx,1-Oly,1,1,1,2), |
./model/src/read_pickup.F |
196 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gvNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/read_pickup.F |
198 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gvNm(1-Olx,1-Oly,1,1,1,2), |
./model/src/read_pickup.F |
202 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gtNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/read_pickup.F |
204 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gtNm(1-Olx,1-Oly,1,1,1,2), |
./model/src/read_pickup.F |
208 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gsNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/read_pickup.F |
210 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gsNm(1-Olx,1-Oly,1,1,1,2), |
./model/src/read_pickup.F |
244 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gwNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/read_pickup.F |
246 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gwNm(1-Olx,1-Oly,1,1,1,2), |
./model/src/read_pickup.F |
272 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GuNm1 ',guNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
276 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GuNm2 ',guNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
281 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GvNm1 ',gvNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
285 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GvNm2 ',gvNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
292 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GtNm1 ',gtNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
296 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GtNm2 ',gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
301 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'TempNm1 ',gtNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
305 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'TempNm2 ',gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
312 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GsNm1 ',gsNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
316 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GsNm2 ',gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
321 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'SaltNm1 ',gsNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
325 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'SaltNm2 ',gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
333 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GwNm1 ',gwNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/read_pickup.F |
337 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'GwNm2 ',gwNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/read_pickup.F |
482 |
READ_PICKUP |
CALL EXCH_UV_3D_RL( guNm(1-Olx,1-Oly,1,1,1,1), |
./model/src/read_pickup.F |
483 |
READ_PICKUP |
& gvNm(1-Olx,1-Oly,1,1,1,1),.TRUE.,Nr,myThid ) |
./model/src/read_pickup.F |
484 |
READ_PICKUP |
CALL EXCH_UV_3D_RL( guNm(1-Olx,1-Oly,1,1,1,2), |
./model/src/read_pickup.F |
485 |
READ_PICKUP |
& gvNm(1-Olx,1-Oly,1,1,1,2),.TRUE.,Nr,myThid ) |
./model/src/read_pickup.F |
486 |
READ_PICKUP |
CALL EXCH_3D_RL( gtNm(1-Olx,1-Oly,1,1,1,1), Nr, myThid ) |
./model/src/read_pickup.F |
487 |
READ_PICKUP |
CALL EXCH_3D_RL( gtNm(1-Olx,1-Oly,1,1,1,2), Nr, myThid ) |
./model/src/read_pickup.F |
488 |
READ_PICKUP |
CALL EXCH_3D_RL( gsNm(1-Olx,1-Oly,1,1,1,1), Nr, myThid ) |
./model/src/read_pickup.F |
489 |
READ_PICKUP |
CALL EXCH_3D_RL( gsNm(1-Olx,1-Oly,1,1,1,2), Nr, myThid ) |
./model/src/read_pickup.F |
510 |
READ_PICKUP |
CALL EXCH_3D_RL( gwNm(1-Olx,1-Oly,1,1,1,1), Nr, myThid ) |
./model/src/read_pickup.F |
511 |
READ_PICKUP |
CALL EXCH_3D_RL( gwNm(1-Olx,1-Oly,1,1,1,2), Nr, myThid ) |
./model/src/rotate_spherical_polar_grid.F |
140 |
ROTATE_SPHERICAL_POLAR_GRID |
DO J = 1-Oly,sNy+Oly |
./model/src/rotate_spherical_polar_grid.F |
219 |
CALC_ANGLES |
_RS uPseudo(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/rotate_spherical_polar_grid.F |
220 |
CALC_ANGLES |
_RS vPseudo(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/rotate_spherical_polar_grid.F |
231 |
CALC_ANGLES |
DO J = 1-Oly,sNy+Oly-1 |
./model/src/rotate_spherical_polar_grid.F |
238 |
CALC_ANGLES |
DO J = 1-Oly,sNy+Oly |
./model/src/rotate_spherical_polar_grid.F |
245 |
CALC_ANGLES |
DO J = 1-Oly,sNy+Oly-1 |
./model/src/rotate_spherical_polar_grid.F |
50 |
ROTATE_SPHERICAL_POLAR_GRID |
_RS X(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./model/src/rotate_spherical_polar_grid.F |
51 |
ROTATE_SPHERICAL_POLAR_GRID |
_RS Y(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./model/src/rotate_uv2en.F |
272 |
ROTATE_UV2EN_RS |
tmpU(i,sny+Oly)=0. |
./model/src/rotate_uv2en.F |
273 |
ROTATE_UV2EN_RS |
tmpV(i,sny+Oly)=0. |
./model/src/rotate_uv2en.F |
91 |
ROTATE_UV2EN_RL |
tmpU(i,sny+Oly)=0. |
./model/src/rotate_uv2en.F |
92 |
ROTATE_UV2EN_RL |
tmpV(i,sny+Oly)=0. |
./model/src/solve_pentadiagonal.F |
54 |
SOLVE_PENTADIAGONAL |
_RL a5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_pentadiagonal.F |
55 |
SOLVE_PENTADIAGONAL |
_RL b5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_pentadiagonal.F |
56 |
SOLVE_PENTADIAGONAL |
_RL c5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_pentadiagonal.F |
57 |
SOLVE_PENTADIAGONAL |
_RL d5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_pentadiagonal.F |
58 |
SOLVE_PENTADIAGONAL |
_RL e5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_pentadiagonal.F |
59 |
SOLVE_PENTADIAGONAL |
_RL y5d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/solve_pentadiagonal.F |
67 |
SOLVE_PENTADIAGONAL |
_RL y5d_m1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_tridiagonal.F |
44 |
SOLVE_TRIDIAGONAL |
_RL a3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_tridiagonal.F |
45 |
SOLVE_TRIDIAGONAL |
_RL b3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_tridiagonal.F |
46 |
SOLVE_TRIDIAGONAL |
_RL c3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_tridiagonal.F |
47 |
SOLVE_TRIDIAGONAL |
_RL y3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./model/src/solve_tridiagonal.F |
56 |
SOLVE_TRIDIAGONAL |
_RL bet(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_tridiagonal.F |
59 |
SOLVE_TRIDIAGONAL |
_RL c3d_m1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/solve_tridiagonal.F |
60 |
SOLVE_TRIDIAGONAL |
_RL y3d_m1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/taueddy_init_varia.F |
44 |
TAUEDDY_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./model/src/thermodynamics.F |
170 |
THERMODYNAMICS |
_RL kappaRT (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/thermodynamics.F |
171 |
THERMODYNAMICS |
_RL kappaRS (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/thermodynamics.F |
175 |
THERMODYNAMICS |
_RL kappaRTr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,PTRACERS_num) |
./model/src/thermodynamics.F |
178 |
THERMODYNAMICS |
_RL kappaRk (1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./model/src/thermodynamics.F |
478 |
THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./model/src/thermodynamics.F |
484 |
THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./model/src/thermodynamics.F |
505 |
THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./model/src/thermodynamics.F |
515 |
THERMODYNAMICS |
DO j=1-Oly,sNy+Oly |
./model/src/thermodynamics.F |
635 |
THERMODYNAMICS |
I gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/thermodynamics.F |
685 |
THERMODYNAMICS |
I gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/timestep.F |
101 |
TIMESTEP |
DO j=1-Oly,sNy+Oly |
./model/src/timestep.F |
48 |
TIMESTEP |
_RL dPhiHydX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/timestep.F |
49 |
TIMESTEP |
_RL dPhiHydY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/timestep_wvel.F |
122 |
TIMESTEP_WVEL |
DO j=1-Oly,sNy+Oly |
./model/src/timestep_wvel.F |
85 |
TIMESTEP_WVEL |
DO j=1-Oly,sNy+Oly |
./model/src/tracers_iigw_correction.F |
50 |
TRACERS_IIGW_CORRECTION |
_RL dW_k(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/tracers_iigw_correction.F |
51 |
TRACERS_IIGW_CORRECTION |
_RL dWp1(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./model/src/tracers_iigw_correction.F |
55 |
TRACERS_IIGW_CORRECTION |
DO j=1-Oly,sNy+Oly |
./model/src/tracers_iigw_correction.F |
66 |
TRACERS_IIGW_CORRECTION |
DO j=1-Oly,sNy+Oly |
./model/src/tracers_iigw_correction.F |
80 |
TRACERS_IIGW_CORRECTION |
DO j=1-Oly,sNy+Oly |
./model/src/tracers_iigw_correction.F |
96 |
TRACERS_IIGW_CORRECTION |
DO j=1-Oly,sNy+Oly |
./model/src/update_etah.F |
115 |
UPDATE_ETAH |
DO j=1-Oly,sNy+Oly |
./model/src/update_etah.F |
150 |
UPDATE_ETAH |
DO j=1-Oly,sNy+Oly |
./model/src/update_etah.F |
55 |
UPDATE_ETAH |
DO j=1-Oly,sNy+Oly |
./model/src/update_etah.F |
65 |
UPDATE_ETAH |
DO j=1-Oly,sNy+Oly |
./model/src/update_masks_etc.F |
122 |
UPDATE_MASKS_ETC |
DO J=1-Oly,sNy+Oly |
./model/src/update_masks_etc.F |
174 |
UPDATE_MASKS_ETC |
DO j=1-Oly,sNy+Oly |
./model/src/update_masks_etc.F |
205 |
UPDATE_MASKS_ETC |
DO J=1-Oly,sNy+Oly |
./model/src/update_masks_etc.F |
294 |
UPDATE_MASKS_ETC |
DO J=1-Oly,sNy+Oly |
./model/src/update_masks_etc.F |
336 |
UPDATE_MASKS_ETC |
DO J=1-Oly,sNy+Oly |
./model/src/update_masks_etc.F |
69 |
UPDATE_MASKS_ETC |
DO J=1-Oly,sNy+Oly |
./model/src/update_r_star.F |
86 |
UPDATE_R_STAR |
DO j=1-Oly,sNy+Oly |
./model/src/update_sigma.F |
101 |
UPDATE_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/update_sigma.F |
112 |
UPDATE_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/update_sigma.F |
127 |
UPDATE_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/update_sigma.F |
138 |
UPDATE_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/update_sigma.F |
153 |
UPDATE_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/update_sigma.F |
164 |
UPDATE_SIGMA |
DO j=1-Oly,sNy+Oly |
./model/src/update_surf_dr.F |
100 |
UPDATE_SURF_DR |
DO j=1-Oly,sNy+Oly |
./model/src/update_surf_dr.F |
109 |
UPDATE_SURF_DR |
DO j=2-Oly,sNy+Oly |
./model/src/update_surf_dr.F |
87 |
UPDATE_SURF_DR |
DO j=1-Oly,sNy+Oly |
./model/src/write_grid.F |
60 |
WRITE_GRID |
DO j=1-Oly,sNy+Oly |
./model/src/write_pickup.F |
132 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, guNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/write_pickup.F |
138 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, guNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
145 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gvNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/write_pickup.F |
151 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gvNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
160 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gtNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/write_pickup.F |
169 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gtNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
181 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gsNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/write_pickup.F |
190 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gsNm(1-Olx,1-Oly,1,1,1,m2), |
./model/src/write_pickup.F |
203 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gwNm(1-Olx,1-Oly,1,1,1,m1), |
./model/src/write_pickup.F |
209 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gwNm(1-Olx,1-Oly,1,1,1,m2), |
./pkg/aim_compon_interf/atm_cpl_read_pickup.F |
85 |
ATM_CPL_READ_PICKUP |
DO j=1-Oly,sNy+Oly |
./pkg/aim_compon_interf/atm_export_atmconfig.F |
47 |
ATM_EXPORT_ATMCONFIG |
DO j=1-Oly,sNy+Oly |
./pkg/aim_compon_interf/atm_import_ocnconfig.F |
44 |
ATM_IMPORT_OCNCONFIG |
DO j=1-Oly,sNy+Oly |
./pkg/aim_compon_interf/cpl_ini_vars.F |
49 |
CPL_INI_VARS |
DO J=1-Oly,sNy+Oly |
./eesupp/src/fill_cs_corner_ag_rl.F |
208 |
FILL_CS_CORNER_AG_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_ag_rl.F |
216 |
FILL_CS_CORNER_AG_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_ag_rl.F |
224 |
FILL_CS_CORNER_AG_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_ag_rl.F |
232 |
FILL_CS_CORNER_AG_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_tr_rl.F |
236 |
FILL_CS_CORNER_TR_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_tr_rl.F |
243 |
FILL_CS_CORNER_TR_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_tr_rl.F |
250 |
FILL_CS_CORNER_TR_RL |
DO j=1,Oly |
./eesupp/src/fill_cs_corner_tr_rl.F |
257 |
FILL_CS_CORNER_TR_RL |
DO j=1,Oly |
./pkg/aim_v23/aim_do_physics.F |
90 |
AIM_DO_PHYSICS |
DO j = 1-Oly, sNy+Oly |
./pkg/aim_v23/aim_fields_load.F |
212 |
AIM_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/aim_v23/aim_initialise.F |
108 |
AIM_INITIALISE |
DO j=1-Oly,sNy+Oly |
./pkg/aim_v23/aim_sice2aim.F |
154 |
AIM_SICE2AIM |
& tOceMxL(1-Olx,1-Oly,bi,bj), |
./pkg/aim_v23/aim_sice2aim.F |
157 |
AIM_SICE2AIM |
& sOceMxL(1-Olx,1-Oly,bi,bj), |
./pkg/aim_v23/aim_tendency_apply.F |
176 |
AIM_TENDENCY_APPLY_V |
_RL aim_vStress(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/aim_v23/aim_tendency_apply.F |
177 |
AIM_TENDENCY_APPLY_V |
_RL aim_KEvStr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/aim_v23/aim_tendency_apply.F |
188 |
AIM_TENDENCY_APPLY_V |
DO j=1-Oly,sNy+Oly |
./pkg/aim_v23/aim_tendency_apply.F |
50 |
AIM_TENDENCY_APPLY_U |
_RL aim_uStress(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/aim_v23/aim_tendency_apply.F |
51 |
AIM_TENDENCY_APPLY_U |
_RL aim_KEuStr(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/aim_v23/aim_tendency_apply.F |
62 |
AIM_TENDENCY_APPLY_U |
DO j=1-Oly,sNy+Oly |
./pkg/atm2d/fixed_flux_add.F |
50 |
FIXED_FLUX_ADD |
_RS tau0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
51 |
FIXED_FLUX_ADD |
_RS tau1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
52 |
FIXED_FLUX_ADD |
_RS tav0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
53 |
FIXED_FLUX_ADD |
_RS tav1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
54 |
FIXED_FLUX_ADD |
_RS wind0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
55 |
FIXED_FLUX_ADD |
_RS wind1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
56 |
FIXED_FLUX_ADD |
_RS qnet0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
57 |
FIXED_FLUX_ADD |
_RS qnet1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
58 |
FIXED_FLUX_ADD |
_RS evap0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
59 |
FIXED_FLUX_ADD |
_RS evap1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
60 |
FIXED_FLUX_ADD |
_RS precip0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
61 |
FIXED_FLUX_ADD |
_RS precip1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
62 |
FIXED_FLUX_ADD |
_RS runoff0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/fixed_flux_add.F |
63 |
FIXED_FLUX_ADD |
_RS runoff1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/relax_add.F |
48 |
RELAX_ADD |
_RS sst0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/relax_add.F |
49 |
RELAX_ADD |
_RS sst1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/relax_add.F |
50 |
RELAX_ADD |
_RS sss0(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/atm2d/relax_add.F |
51 |
RELAX_ADD |
_RS sss1(1-Olx:sNx+Olx,1-Oly:sNy+Oly,1,1) |
./pkg/autodiff/addamp_adj.F |
27 |
ADDAMP_ADJ |
_RL fieldRef(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn,nSx,nSy) |
./pkg/autodiff/addamp_adj.F |
28 |
ADDAMP_ADJ |
_RL adfieldDamp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn,nSx,nSy) |
./pkg/autodiff/addamp_adj.F |
35 |
ADDAMP_ADJ |
DO j=1-Oly,sNy+Oly |
./pkg/autodiff/adread_adwrite.F |
170 |
ADREAD |
length2d=(sNx+2*Olx)*(sNy+2*Oly)*nSx*nSy |
./pkg/autodiff/adread_adwrite.F |
346 |
ADWRITE |
length2d=(sNx+2*Olx)*(sNy+2*Oly)*nSx*nSy |
./pkg/autodiff/adzero_adj.F |
102 |
ADZERO_ADJ |
DO j=1-Oly,sNy+Oly |
./pkg/autodiff/adzero_adj.F |
58 |
ADZERO_ADJ_LOC |
_RL adFieldFwd(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn) |
./pkg/autodiff/adzero_adj.F |
64 |
ADZERO_ADJ_LOC |
DO j=1-Oly,sNy+Oly |
./pkg/autodiff/adzero_adj.F |
94 |
ADZERO_ADJ |
_RL adFieldFwd(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn,nSx,nSy) |
./pkg/autodiff/autodiff_restore.F |
131 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
172 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
215 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
257 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
378 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
411 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
444 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_restore.F |
93 |
AUTODIFF_RESTORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
141 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
182 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
241 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
294 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
463 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
505 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
547 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/autodiff_store.F |
93 |
AUTODIFF_STORE |
DO J=1-Oly,sNy+Oly |
./eesupp/src/lef_zero.F |
29 |
LEF_ZERO |
DO j=1-Oly,sNy+Oly |
./pkg/autodiff/damp_adj.F |
27 |
DAMP_ADJ |
_RL fieldRef(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn,nSx,nSy) |
./pkg/autodiff/damp_adj.F |
28 |
DAMP_ADJ |
_RL fieldDamp(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn,nSx,nSy) |
./pkg/autodiff/ini_autodiff.F |
52 |
INI_AUTODIFF |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/ini_autodiff.F |
63 |
INI_AUTODIFF |
DO J=1-Oly,sNy+Oly |
./pkg/autodiff/zero_adj.F |
54 |
ZERO_ADJ_LOC |
_RL FieldFwd(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn) |
./pkg/autodiff/zero_adj.F |
81 |
ZERO_ADJ |
_RL FieldFwd(1-Olx:sNx+Olx,1-Oly:sNy+Oly,NrIn,nSx,nSy) |
./pkg/bulk_force/bulkf_fields_load.F |
131 |
BULKF_FIELDS_LOAD |
DO j = 1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_fields_load.F |
294 |
BULKF_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_fields_load.F |
348 |
BULKF_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_fields_load.F |
387 |
BULKF_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_forcing.F |
159 |
BULKF_FORCING |
DO j = 1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_forcing.F |
165 |
BULKF_FORCING |
DO j = 1-Oly+1,sNy+Oly |
./pkg/bulk_force/bulkf_forcing.F |
174 |
BULKF_FORCING |
DO j = 1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_forcing.F |
81 |
BULKF_FORCING |
DO j = 1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_init_varia.F |
44 |
BULKF_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_init_varia.F |
64 |
BULKF_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./pkg/bulk_force/bulkf_init_varia.F |
81 |
BULKF_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./pkg/cd_code/cd_code_ini_vars.F |
35 |
CD_CODE_INI_VARS |
DO J=1-Oly,sNy+Oly |
./pkg/cd_code/cd_code_ini_vars.F |
46 |
CD_CODE_INI_VARS |
DO J=1-Oly,sNy+Oly |
./pkg/cd_code/cd_code_scheme.F |
111 |
CD_CODE_SCHEME |
DO j=1-Oly+1,sNy+Oly |
./pkg/cd_code/cd_code_scheme.F |
170 |
CD_CODE_SCHEME |
DO j=1-Oly,sNy+Oly |
./pkg/cd_code/cd_code_scheme.F |
42 |
CD_CODE_SCHEME |
_RL dPhiHydX(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/cd_code/cd_code_scheme.F |
43 |
CD_CODE_SCHEME |
_RL dPhiHydY(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/cd_code/cd_code_scheme.F |
44 |
CD_CODE_SCHEME |
_RL guFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/cd_code/cd_code_scheme.F |
45 |
CD_CODE_SCHEME |
_RL gvFld(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/cd_code/cd_code_scheme.F |
46 |
CD_CODE_SCHEME |
_RL guCor(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/cd_code/cd_code_scheme.F |
47 |
CD_CODE_SCHEME |
_RL gvCor(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/cd_code/cd_code_scheme.F |
68 |
CD_CODE_SCHEME |
PARAMETER( jMin = 1-Oly+1 , jMax = sNy+Oly-1 ) |
./pkg/cd_code/cd_code_scheme.F |
93 |
CD_CODE_SCHEME |
DO j=1-Oly,sNy+Oly |
./pkg/cfc/cfc_fields_load.F |
125 |
CFC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/cfc/cfc_fields_load.F |
140 |
CFC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/cfc/cfc_fields_load.F |
160 |
CFC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/cfc/cfc_fields_load.F |
176 |
CFC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/cfc/cfc_fields_load.F |
189 |
CFC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/adams2d.F |
63 |
ADAMS2D |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/cheapaml.F |
444 |
CHEAPAML |
DO j = 1-Oly,sNy+Oly |
./pkg/cheapaml/cheapaml.F |
450 |
CHEAPAML |
DO j = 1-Oly+1,sNy+Oly |
./pkg/cheapaml/cheapaml_fields_load.F |
273 |
CHEAPAML_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
108 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
116 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
126 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
133 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
140 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
148 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
157 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_2d_calc_rhs.F |
164 |
GAD_2D_CALC_RHS |
DO j=1-Oly,sNy+Oly-1 |
./pkg/cheapaml/gad_c2_2d_adv_x.F |
48 |
GAD_C2_2D_ADV_X |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_c2_2d_adv_y.F |
49 |
GAD_C2_2D_ADV_Y |
vT(i,1-Oly)=0. |
./pkg/cheapaml/gad_c2_2d_adv_y.F |
51 |
GAD_C2_2D_ADV_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/cheapaml/gad_diff_2d_x.F |
49 |
GAD_DIFF_2D_X |
DO j=1-Oly,sNy+Oly |
./pkg/cheapaml/gad_diff_2d_y.F |
50 |
GAD_DIFF_2D_Y |
dfy(i,1-Oly)=0. |
./pkg/cheapaml/gad_diff_2d_y.F |
52 |
GAD_DIFF_2D_Y |
DO j=1-Oly+1,sNy+Oly |
./pkg/ctrl/adctrl_bound.F |
113 |
ADCTRL_BOUND_2D |
_RL fieldCur(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nsx,nsy) |
./pkg/ctrl/adctrl_bound.F |
114 |
ADCTRL_BOUND_2D |
_RL maskFld3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/adctrl_bound.F |
115 |
ADCTRL_BOUND_2D |
_RL adjFieldCur(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nsx,nsy) |
./pkg/ctrl/adctrl_bound.F |
24 |
ADCTRL_BOUND_3D |
_RL fieldCur(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/adctrl_bound.F |
25 |
ADCTRL_BOUND_3D |
_RL maskFld3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/adctrl_bound.F |
26 |
ADCTRL_BOUND_3D |
_RL adjFieldCur(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/ctrl.h |
552 |
NO PROCEDURE |
_RL xx_obcsw0 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
./pkg/ctrl/ctrl.h |
553 |
NO PROCEDURE |
_RL xx_obcsw1 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
./pkg/ctrl/ctrl.h |
556 |
NO PROCEDURE |
_RL xx_obcse0 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
./pkg/ctrl/ctrl.h |
557 |
NO PROCEDURE |
_RL xx_obcse1 (1-Oly:sNy+Oly,Nr,nSx,nSy,nobcs) |
./pkg/ctrl/ctrl_bound.F |
25 |
CTRL_BOUND_3D |
_RL fieldCur(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/ctrl_bound.F |
26 |
CTRL_BOUND_3D |
_RL maskFld3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/ctrl_bound.F |
79 |
CTRL_BOUND_2D |
_RL fieldCur(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nsx,nsy) |
./pkg/ctrl/ctrl_bound.F |
80 |
CTRL_BOUND_2D |
_RL maskFld3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nsx,nsy) |
./pkg/ctrl/ctrl_map_ini.F |
572 |
CTRL_MAP_INI |
_EXCH_XYZ_RL(pTracer(1-Olx,1-Oly,1,1,1,1),myThid) |
./pkg/ctrl/ctrl_set_pack_xy.F |
351 |
CTRL_SET_PACK_XY |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xy.F |
355 |
CTRL_SET_PACK_XY |
_RL fld2d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xy.F |
359 |
CTRL_SET_PACK_XY |
_RL fld2dDim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xy.F |
360 |
CTRL_SET_PACK_XY |
_RL fld2dNodim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xy.F |
362 |
CTRL_SET_PACK_XY |
_RL wei2d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
278 |
CTRL_SET_PACK_XYZ |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
282 |
CTRL_SET_PACK_XYZ |
_RL fld3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
286 |
CTRL_SET_PACK_XYZ |
_RL fld3dDim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
287 |
CTRL_SET_PACK_XYZ |
_RL fld3dNodim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_pack_xyz.F |
290 |
CTRL_SET_PACK_XYZ |
_RL wei3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
398 |
CTRL_SET_UNPACK_XY |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
402 |
CTRL_SET_UNPACK_XY |
_RL fld2d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
406 |
CTRL_SET_UNPACK_XY |
_RL fld2dDim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
407 |
CTRL_SET_UNPACK_XY |
_RL fld2dNodim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xy.F |
409 |
CTRL_SET_UNPACK_XY |
_RL wei2d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
306 |
CTRL_SET_UNPACK_XYZ |
_RL msk3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
310 |
CTRL_SET_UNPACK_XYZ |
_RL fld3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
314 |
CTRL_SET_UNPACK_XYZ |
_RL fld3dDim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
315 |
CTRL_SET_UNPACK_XYZ |
_RL fld3dNodim(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/ctrl/ctrl_set_unpack_xyz.F |
318 |
CTRL_SET_UNPACK_XYZ |
_RL wei3d(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr,nSx,nSy) |
./pkg/debug/fill_in_corners_rl.F |
44 |
FILL_IN_CORNERS_RL |
DO j=1-Oly,0 |
./pkg/debug/fill_in_corners_rl.F |
45 |
FILL_IN_CORNERS_RL |
jj = j + sNy+Oly |
./pkg/debug/write_fullarray_rl.F |
116 |
WRITE_FULLARRAY_RL |
& filePrec, (sNx+2*Olx)*(sNy+2*Oly), myThid ) |
./pkg/debug/write_fullarray_rl.F |
123 |
WRITE_FULLARRAY_RL |
& j=1-Oly,sNy+Oly ) |
./pkg/debug/write_fullarray_rl.F |
41 |
WRITE_FULLARRAY_RL |
_RL fld(1-Olx:sNx+Olx,1-Oly:sNy+Oly,kSize,nSx,nSy) |
./pkg/debug/write_fullarray_rl.F |
87 |
WRITE_FULLARRAY_RL |
& filePrec, (sNx+2*Olx)*(sNy+2*Oly), myThid ) |
./pkg/debug/write_fullarray_rl.F |
94 |
WRITE_FULLARRAY_RL |
& j=1-Oly,sNy+Oly ) |
./pkg/diagnostics/DIAGNOSTICS.h |
54 |
NO PROCEDURE |
_RL qdiag(1-OLx:sNx+Olx,1-Oly:sNy+Oly,numDiags,nSx,nSy) |
./pkg/diagnostics/DIAGSTATS_REGIONS.h |
26 |
NO PROCEDURE |
_RS diagSt_regMask(1-OLx:sNx+Olx,1-Oly:sNy+Oly, |
./pkg/diagnostics/DIAGSTATS_REGIONS.h |
29 |
NO PROCEDURE |
_RS diagSt_regMask(1-Olx:1-Olx,1-Oly:1-Oly,1,nSx,nSy) |
./pkg/diagnostics/diagnostics_init_varia.F |
36 |
DIAGNOSTICS_INIT_VARIA |
DO j = 1-Oly,sNy+Oly |
./pkg/diagnostics/diagstats_local.F |
126 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
127 |
DIAGSTATS_LOCAL |
I maskW(1-Olx,1-Oly,k,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
128 |
DIAGSTATS_LOCAL |
I hFacW(1-Olx,1-Oly,k,bi,bj), rAw(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
138 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
139 |
DIAGSTATS_LOCAL |
I maskS(1-Olx,1-Oly,k,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
140 |
DIAGSTATS_LOCAL |
I hFacS(1-Olx,1-Oly,k,bi,bj), rAs(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
149 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
150 |
DIAGSTATS_LOCAL |
I maskC(1-Olx,1-Oly,k,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
151 |
DIAGSTATS_LOCAL |
I hFacC(1-Olx,1-Oly,k,bi,bj), rA(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
164 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
165 |
DIAGSTATS_LOCAL |
I maskInC(1-Olx,1-Oly,bi,bj), rA(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
177 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
178 |
DIAGSTATS_LOCAL |
I rA(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
193 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
194 |
DIAGSTATS_LOCAL |
I maskInW(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
195 |
DIAGSTATS_LOCAL |
I maskInW(1-Olx,1-Oly,bi,bj),rAw(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
204 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
205 |
DIAGSTATS_LOCAL |
I maskInS(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
206 |
DIAGSTATS_LOCAL |
I maskInS(1-Olx,1-Oly,bi,bj),rAs(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
215 |
DIAGSTATS_LOCAL |
I diagSt_regMask(1-Olx,1-Oly,kRegMsk,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
216 |
DIAGSTATS_LOCAL |
I maskInC(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_local.F |
217 |
DIAGSTATS_LOCAL |
I maskInC(1-Olx,1-Oly,bi,bj), rA(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_others_calc.F |
107 |
DIAGSTATS_LM_CALC |
I dpphys(1-Olx,1-Oly,kl,bi,bj), arrArea, |
./pkg/diagnostics/diagstats_others_calc.F |
224 |
DIAGSTATS_G_CALC |
I regMask, aim_landFr(1-Olx,1-Oly,bi,bj), |
./pkg/diagnostics/diagstats_others_calc.F |
225 |
DIAGSTATS_G_CALC |
I aim_landFr(1-Olx,1-Oly,bi,bj), arrArea, |
./pkg/diagnostics/diagstats_set_regions.F |
106 |
DIAGSTATS_SET_REGIONS |
DO j=1-Oly,sNy+Oly |
./pkg/diagnostics/diagstats_set_regions.F |
196 |
DIAGSTATS_SET_REGIONS |
DO j=1-Oly,1-Oly |
./pkg/diagnostics/diagstats_set_regions.F |
44 |
DIAGSTATS_SET_REGIONS |
_RS tmpVar(1-OLx:sNx+Olx,1-Oly:sNy+Oly,nSx,nSy) |
./pkg/diagnostics/diagstats_set_regions.F |
58 |
DIAGSTATS_SET_REGIONS |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
135 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
148 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
157 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
165 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
175 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
191 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
209 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_fields_load.F |
218 |
DIC_FIELDS_LOAD |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_ini_forcing.F |
88 |
DIC_INI_FORCING |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_init_varia.F |
43 |
DIC_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_init_varia.F |
50 |
DIC_INIT_VARIA |
DO j=1-Oly,sNy+Oly |
./pkg/dic/dic_surfforcing_init.F |
109 |
DIC_SURFFORCING_INIT |
DO j=1-Oly,sNy+Oly |
./pkg/down_slope/DWNSLP_SIZE.h |
11 |
NO PROCEDURE |
PARAMETER ( xySize = xSize*(Oly+sNy+Oly) ) |
./pkg/down_slope/DWNSLP_SIZE.h |
18 |
NO PROCEDURE |
PARAMETER ( DWNSLP_size = xSize * (Oly+sNy+Oly) ) |
./pkg/down_slope/dwnslp_calc_rho.F |
46 |
DWNSLP_CALC_RHO |
_RL rhoLoc (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
./pkg/down_slope/dwnslp_init_fixed.F |
213 |
DWNSLP_INIT_FIXED |
jdeep = 1-Oly + (ijd-1)/xSize |
./pkg/down_slope/dwnslp_init_fixed.F |
310 |
DWNSLP_INIT_FIXED |
jdeep = 1-Oly + (ijd-1)/xSize |
./pkg/ebm/ebm_wind_perturb.F |
109 |
EBM_WIND_PERTURB |
if ( ya2(j) .gt. sNy+Oly ) then |
./pkg/ecco/cost_averagesfields.F |
183 |
COST_AVERAGESFIELDS |
& tbar, theta(1-Olx,1-Oly,1,1,1), xx_tbar_mean_dummy, |
./pkg/ecco/cost_averagesfields.F |
197 |
COST_AVERAGESFIELDS |
& sstbar, theta(1-Olx,1-Oly,1,1,1), xx_sstbar_mean_dummy, |
./pkg/ecco/cost_averagesfields.F |
220 |
COST_AVERAGESFIELDS |
& sbar, salt(1-Olx,1-Oly,1,1,1), xx_sbar_mean_dummy, |
./pkg/ecco/cost_averagesfields.F |
466 |
COST_AVERAGESFIELDS |
& smrsstbar, theta(1-Olx,1-Oly,1,1,1), |
./pkg/ecco/cost_averagesfields.F |
477 |
COST_AVERAGESFIELDS |
& smrsssbar, salt(1-Olx,1-Oly,1,1,1), |
./pkg/ecco/cost_averagesfields.F |
492 |
COST_AVERAGESFIELDS |
& gencost_barfld(1-Olx,1-Oly,1,1,num_var), |
./pkg/ecco/cost_averagesfields.F |
493 |
COST_AVERAGESFIELDS |
& gencost_modfld(1-Olx,1-Oly,1,1,num_var), |
./pkg/ecco/cost_gencost_all.F |
70 |
COST_GENCOST_ALL |
& gencost_barfld(1-Olx,1-Oly,1,1,k), |
./pkg/ecco/cost_gencost_all.F |
74 |
COST_GENCOST_ALL |
& gencost_mask(k), gencost_weight(1-Olx,1-Oly,1,1,k), |
./model/inc/GRID.h |
318 |
NO PROCEDURE |
_RL cosFacU (1-Oly:sNy+Oly,nSx,nSy) |
./model/inc/GRID.h |
319 |
NO PROCEDURE |
_RL cosFacV (1-Oly:sNy+Oly,nSx,nSy) |
./model/inc/GRID.h |
320 |
NO PROCEDURE |
_RL sqCosFacU (1-Oly:sNy+Oly,nSx,nSy) |
./model/inc/GRID.h |
321 |
NO PROCEDURE |
_RL sqCosFacV (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/exf/exf_init.F |
51 |
EXF_INIT |
DO j=1-Oly,sNy+Oly |