| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_albedo.F |
10 |
THSICE_ALBEDO |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_albedo.F |
50 |
THSICE_ALBEDO |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_albedo.F |
54 |
THSICE_ALBEDO |
_RL iceMask(siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_albedo.F |
55 |
THSICE_ALBEDO |
_RL hIce (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_albedo.F |
56 |
THSICE_ALBEDO |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_albedo.F |
57 |
THSICE_ALBEDO |
_RL tSrf (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_albedo.F |
58 |
THSICE_ALBEDO |
_RL ageSnw (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_albedo.F |
59 |
THSICE_ALBEDO |
_RL sAlb (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_albedo.F |
60 |
THSICE_ALBEDO |
_RL sAlbNIR(siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
109 |
THSICE_CALC_THICKN |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_calc_thickn.F |
10 |
THSICE_CALC_THICKN |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_calc_thickn.F |
114 |
THSICE_CALC_THICKN |
_RL iceMask(siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
115 |
THSICE_CALC_THICKN |
_RL tFrz (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
116 |
THSICE_CALC_THICKN |
_RL tOce (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
117 |
THSICE_CALC_THICKN |
_RL v2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
118 |
THSICE_CALC_THICKN |
_RL snowP (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
119 |
THSICE_CALC_THICKN |
_RL prcAtm (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
120 |
THSICE_CALC_THICKN |
_RL sHeat (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
121 |
THSICE_CALC_THICKN |
_RL flxCnB (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
122 |
THSICE_CALC_THICKN |
_RL icFrac (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
123 |
THSICE_CALC_THICKN |
_RL hIce (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
124 |
THSICE_CALC_THICKN |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
125 |
THSICE_CALC_THICKN |
_RL tSrf (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
126 |
THSICE_CALC_THICKN |
_RL qIc1 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
127 |
THSICE_CALC_THICKN |
_RL qIc2 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
128 |
THSICE_CALC_THICKN |
_RL frwAtm (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
129 |
THSICE_CALC_THICKN |
_RL fzMlOc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
130 |
THSICE_CALC_THICKN |
_RL flx2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
131 |
THSICE_CALC_THICKN |
_RL frw2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_calc_thickn.F |
132 |
THSICE_CALC_THICKN |
_RL fsalt (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
10 |
THSICE_EXTEND |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_extend.F |
70 |
THSICE_EXTEND |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_extend.F |
76 |
THSICE_EXTEND |
_RL fzMlOc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
77 |
THSICE_EXTEND |
_RL tFrz (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
78 |
THSICE_EXTEND |
_RL tOce (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
79 |
THSICE_EXTEND |
_RL icFrac (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
80 |
THSICE_EXTEND |
_RL hIce (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
81 |
THSICE_EXTEND |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
82 |
THSICE_EXTEND |
_RL tSrf (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
83 |
THSICE_EXTEND |
_RL tIc1 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
84 |
THSICE_EXTEND |
_RL tIc2 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
85 |
THSICE_EXTEND |
_RL qIc1 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
86 |
THSICE_EXTEND |
_RL qIc2 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
87 |
THSICE_EXTEND |
_RL flx2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
88 |
THSICE_EXTEND |
_RL frw2oc (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_extend.F |
89 |
THSICE_EXTEND |
_RL fsalt (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_impl_temp.F |
102 |
THSICE_IMPL_TEMP |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_impl_temp.F |
104 |
THSICE_IMPL_TEMP |
I iceMask(siLo,sjLo,bi,bj), iceHeight(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_impl_temp.F |
105 |
THSICE_IMPL_TEMP |
I snowHeight(siLo,sjLo,bi,bj), tFrzOce, sFlx, |
|
./pkg/thsice/thsice_impl_temp.F |
106 |
THSICE_IMPL_TEMP |
U icFlxSW(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./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 |
108 |
THSICE_IMPL_TEMP |
O Tice1(siLo,sjLo,bi,bj), Tice2(siLo,sjLo,bi,bj), dTsurf, |
|
./pkg/thsice/thsice_impl_temp.F |
109 |
THSICE_IMPL_TEMP |
O sHeating(siLo,sjLo,bi,bj), flxCndBt(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_impl_temp.F |
110 |
THSICE_IMPL_TEMP |
O icFlxAtm(siLo,sjLo,bi,bj), icFrwAtm(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_impl_temp.F |
30 |
THSICE_IMPL_TEMP |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_impl_temp.F |
32 |
THSICE_IMPL_TEMP |
PARAMETER ( sjLo = 1-OLy , sjHi = sNy+OLy ) |
|
./pkg/thsice/thsice_solve4temp.F |
100 |
THSICE_SOLVE4TEMP |
_RL hSnow (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
101 |
THSICE_SOLVE4TEMP |
_RL tFrz (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
103 |
THSICE_SOLVE4TEMP |
_RL flxSW (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
104 |
THSICE_SOLVE4TEMP |
_RL tSrf (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
105 |
THSICE_SOLVE4TEMP |
_RL qIc1 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
106 |
THSICE_SOLVE4TEMP |
_RL qIc2 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
107 |
THSICE_SOLVE4TEMP |
_RL tIc1 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
108 |
THSICE_SOLVE4TEMP |
_RL tIc2 (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
10 |
THSICE_SOLVE4TEMP |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_solve4temp.F |
111 |
THSICE_SOLVE4TEMP |
_RL sHeat (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
112 |
THSICE_SOLVE4TEMP |
_RL flxCnB (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
113 |
THSICE_SOLVE4TEMP |
_RL flxAtm (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
114 |
THSICE_SOLVE4TEMP |
_RL evpAtm (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
91 |
THSICE_SOLVE4TEMP |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_solve4temp.F |
98 |
THSICE_SOLVE4TEMP |
_RL iceMask(siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_solve4temp.F |
99 |
THSICE_SOLVE4TEMP |
_RL hIce (siLo:siHi,sjLo:sjHi) |
|
./pkg/thsice/thsice_step_fwd.F |
225 |
THSICE_STEP_FWD |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_step_fwd.F |
227 |
THSICE_STEP_FWD |
I iceMask(siLo,sjLo,bi,bj), tFrzOce, |
|
./pkg/thsice/thsice_step_fwd.F |
228 |
THSICE_STEP_FWD |
I tOceMxL(siLo,sjLo,bi,bj), v2ocMxL(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
229 |
THSICE_STEP_FWD |
I snowPrc(siLo,sjLo,bi,bj), prcAtm, |
|
./pkg/thsice/thsice_step_fwd.F |
230 |
THSICE_STEP_FWD |
I sHeating(siLo,sjLo,bi,bj), flxCndBt(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
231 |
THSICE_STEP_FWD |
U iceFrac, iceHeight(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
232 |
THSICE_STEP_FWD |
U snowHeight(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
233 |
THSICE_STEP_FWD |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
234 |
THSICE_STEP_FWD |
U icFrwAtm(siLo,sjLo,bi,bj), frzmltMxL, flx2oc, |
|
./pkg/thsice/thsice_step_fwd.F |
300 |
THSICE_STEP_FWD |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_step_fwd.F |
303 |
THSICE_STEP_FWD |
I tOceMxL(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
304 |
THSICE_STEP_FWD |
U iceFrac, iceHeight(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
305 |
THSICE_STEP_FWD |
U snowHeight(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
306 |
THSICE_STEP_FWD |
U Tice1(siLo,sjLo,bi,bj), Tice2(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
307 |
THSICE_STEP_FWD |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_fwd.F |
44 |
THSICE_STEP_FWD |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_step_fwd.F |
46 |
THSICE_STEP_FWD |
PARAMETER ( sjLo = 1-OLy , sjHi = sNy+OLy ) |
|
./pkg/thsice/thsice_step_temp.F |
113 |
THSICE_STEP_TEMP |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_step_temp.F |
115 |
THSICE_STEP_TEMP |
I iceMask(siLo,sjLo,bi,bj), iceHeight(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
116 |
THSICE_STEP_TEMP |
I snowHeight(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
117 |
THSICE_STEP_TEMP |
I snowAge(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
118 |
THSICE_STEP_TEMP |
O siceAlb(siLo,sjLo,bi,bj), icAlbNIR(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
156 |
THSICE_STEP_TEMP |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/thsice/thsice_step_temp.F |
159 |
THSICE_STEP_TEMP |
I iceMask(siLo,sjLo,bi,bj), iceHeight(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
160 |
THSICE_STEP_TEMP |
I snowHeight(siLo,sjLo,bi,bj), tFrzOce, tmpflx, |
|
./pkg/thsice/thsice_step_temp.F |
161 |
THSICE_STEP_TEMP |
U icFlxSW(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
162 |
THSICE_STEP_TEMP |
U Qice1(siLo,sjLo,bi,bj), Qice2(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
163 |
THSICE_STEP_TEMP |
O Tice1(siLo,sjLo,bi,bj), Tice2(siLo,sjLo,bi,bj), tmpdTs, |
|
./pkg/thsice/thsice_step_temp.F |
164 |
THSICE_STEP_TEMP |
O sHeating(siLo,sjLo,bi,bj), flxCndBt(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
165 |
THSICE_STEP_TEMP |
O icFlxAtm(siLo,sjLo,bi,bj), icFrwAtm(siLo,sjLo,bi,bj), |
|
./pkg/thsice/thsice_step_temp.F |
36 |
THSICE_STEP_TEMP |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/thsice/thsice_step_temp.F |
38 |
THSICE_STEP_TEMP |
PARAMETER ( sjLo = 1-OLy , sjHi = sNy+OLy ) |
|
./pkg/aim_v23/aim_sice2aim.F |
112 |
AIM_SICE2AIM |
I bi, bj, siLo, siHi, sjLo, sjHi, |
|
./pkg/aim_v23/aim_sice2aim.F |
114 |
AIM_SICE2AIM |
I iceMask(siLo,sjLo,bi,bj), iceHeight(siLo,sjLo,bi,bj), |
|
./pkg/aim_v23/aim_sice2aim.F |
115 |
AIM_SICE2AIM |
I snowHeight(siLo,sjLo,bi,bj), Tsrf(siLo,sjLo,bi,bj), |
|
./pkg/aim_v23/aim_sice2aim.F |
116 |
AIM_SICE2AIM |
I snowAge(siLo,sjLo,bi,bj), |
|
./pkg/aim_v23/aim_sice2aim.F |
117 |
AIM_SICE2AIM |
O siceAlb(siLo,sjLo,bi,bj), icAlbNIR(siLo,sjLo,bi,bj), |
|
./pkg/aim_v23/aim_sice2aim.F |
48 |
AIM_SICE2AIM |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/aim_v23/aim_sice2aim.F |
50 |
AIM_SICE2AIM |
PARAMETER ( sjLo = 1-OLy , sjHi = sNy+OLy ) |
|
./pkg/atm2d/calc_zonal_means.F |
27 |
CALC_ZONAL_MEANS |
INTEGER siLo, siHi, sjLo, sjHi |
|
./pkg/atm2d/calc_zonal_means.F |
29 |
CALC_ZONAL_MEANS |
PARAMETER ( sjLo = 1-OLy , sjHi = sNy+OLy ) |
|
./pkg/atm2d/calc_zonal_means.F |
62 |
CALC_ZONAL_MEANS |
I 1, 1, siLo, siHi, sjLo, sjHi, |
|
./pkg/atm2d/calc_zonal_means.F |
64 |
CALC_ZONAL_MEANS |
I iceMask(siLo,sjLo,1,1), iceHeight(siLo,sjLo,1,1), |
|
./pkg/atm2d/calc_zonal_means.F |
65 |
CALC_ZONAL_MEANS |
I snowHeight(siLo,sjLo,1,1), Tsrf(siLo,sjLo,1,1), |
|
./pkg/atm2d/calc_zonal_means.F |
66 |
CALC_ZONAL_MEANS |
I snowAge(siLo,sjLo,1,1), |
|
./pkg/atm2d/calc_zonal_means.F |
67 |
CALC_ZONAL_MEANS |
O siceAlb(siLo,sjLo,1,1), icAlbNIR(siLo,sjLo,1,1), |