File |
Line number |
Procedure |
Code |
./pkg/ocn_compon_interf/ocn_apply_import.F |
120 |
OCN_APPLY_IMPORT |
Qice1 (i,j,bi,bj) = sIceQ1_cpl (i,j,bi,bj) |
./pkg/ocn_compon_interf/ocn_apply_import.F |
196 |
OCN_APPLY_IMPORT |
_EXCH_XY_RL( Qice1 , myThid ) |
./pkg/ocn_compon_interf/ocn_store_my_data.F |
116 |
OCN_STORE_MY_DATA |
sIceQ1_cpl (i,j,bi,bj) = Qice1(i,j,bi,bj) |
./pkg/thsice/THSICE_VARS.h |
25 |
NO PROCEDURE |
& Qice1, Qice2, snowAge |
./pkg/thsice/THSICE_VARS.h |
33 |
NO PROCEDURE |
_RL Qice1 (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/thsice/thsice_advdiff.F |
175 |
THSICE_ADVDIFF |
I Qice1(1-OLx,1-OLy,bi,bj), |
./pkg/thsice/thsice_advdiff.F |
357 |
THSICE_ADVDIFF |
U iceVol, Qice1(1-OLx,1-OLy,bi,bj), |
./pkg/thsice/thsice_advdiff.F |
497 |
THSICE_ADVDIFF |
& *( Qice1(i,j,bi,bj) |
./pkg/thsice/thsice_advdiff.F |
507 |
THSICE_ADVDIFF |
Qice1 (i,j,bi,bj) = 0. _d 0 |
./pkg/thsice/thsice_advdiff.F |
564 |
THSICE_ADVDIFF |
I Qice1(1-OLx,1-OLy,bi,bj), |
./pkg/thsice/thsice_check_conserv.F |
69 |
THSICE_CHECK_CONSERV |
& *(Qice1(i,j,bi,bj)+Qice2(i,j,bi,bj))*0.5 |
./pkg/thsice/thsice_diagnostics_state.F |
90 |
THSICE_DIAGNOSTICS_STATE |
I Qice1(1-OLx,1-OLy,bi,bj), |
./pkg/thsice/thsice_do_exch.F |
40 |
THSICE_DO_EXCH |
CALL EXCH_XY_RL( Qice1, myThid ) |
./pkg/thsice/thsice_impl_temp.F |
107 |
THSICE_IMPL_TEMP |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
./pkg/thsice/thsice_impl_temp.F |
94 |
THSICE_IMPL_TEMP |
& Qice1(i,j,bi,bj), Qice2(i,j,bi,bj) |
./pkg/thsice/thsice_ini_vars.F |
136 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceEnthp_InitFile,Qice1,1,0,myThid) |
./pkg/thsice/thsice_ini_vars.F |
152 |
THSICE_INI_VARS |
Qice1(i,j,bi,bj) = -cpWater*Tmlt1 |
./pkg/thsice/thsice_ini_vars.F |
169 |
THSICE_INI_VARS |
_EXCH_XY_RL(Qice1, myThid) |
./pkg/thsice/thsice_ini_vars.F |
63 |
THSICE_INI_VARS |
Qice1(i,j,bi,bj) = 0. _d 0 |
./pkg/thsice/thsice_monitor.F |
249 |
THSICE_MONITOR |
I 1, Qice1, locMask, maskInC, rA, locDr, |
./pkg/thsice/thsice_output.F |
292 |
THSICE_OUTPUT |
CALL WRITE_FLD_XY_RL('ice_Qice1.', suff,Qice1, |
./pkg/thsice/thsice_output.F |
336 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'Qice1', Qice1, myThid) |
./pkg/thsice/thsice_read_pickup.F |
60 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, Qice1, 7, myIter,myThid ) |
./pkg/thsice/thsice_read_pickup.F |
83 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Qice1', Qice1, myThid) |
./pkg/thsice/thsice_step_fwd.F |
248 |
THSICE_STEP_FWD |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
./pkg/thsice/thsice_step_fwd.F |
338 |
THSICE_STEP_FWD |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
./pkg/thsice/thsice_step_fwd.F |
382 |
THSICE_STEP_FWD |
Qice1(i,j,bi,bj) = Lfresh |
./pkg/thsice/thsice_step_temp.F |
181 |
THSICE_STEP_TEMP |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
./pkg/thsice/thsice_write_pickup.F |
63 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, Qice1, 7, myIter,myThid ) |
./pkg/thsice/thsice_write_pickup.F |
97 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Qice1', Qice1, myThid) |
./pkg/atm_compon_interf/atm_apply_import.F |
72 |
ATM_APPLY_IMPORT |
Qice1 (i,j,bi,bj) = sIceQ1_cpl (i,j,bi,bj) |
./pkg/atm_compon_interf/atm_store_thsice.F |
96 |
ATM_STORE_THSICE |
sIceQ1_cpl (i,j,bi,bj) = Qice1(i,j,bi,bj) |