| File |
Line number |
Procedure |
Code |
|
./pkg/streamice/STREAMICE.h |
303 |
NO PROCEDURE |
& H_streamice, |
|
./pkg/streamice/STREAMICE.h |
380 |
NO PROCEDURE |
_RL H_streamice (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/streamice/streamice_adv_front.F |
165 |
STREAMICE_ADV_FRONT |
href = href + H_streamice(i-1,j,bi,bj) |
|
./pkg/streamice/streamice_adv_front.F |
177 |
STREAMICE_ADV_FRONT |
href = href + H_streamice(i+1,j,bi,bj) |
|
./pkg/streamice/streamice_adv_front.F |
189 |
STREAMICE_ADV_FRONT |
href = href + H_streamice(i,j-1,bi,bj) |
|
./pkg/streamice/streamice_adv_front.F |
201 |
STREAMICE_ADV_FRONT |
href = href + H_streamice(i,j+1,bi,bj) |
|
./pkg/streamice/streamice_adv_front.F |
210 |
STREAMICE_ADV_FRONT |
partial_vol = H_streamice (i,j,bi,bj) * |
|
./pkg/streamice/streamice_adv_front.F |
216 |
STREAMICE_ADV_FRONT |
H_streamice (i,j,bi,bj) = href |
|
./pkg/streamice/streamice_adv_front.F |
225 |
STREAMICE_ADV_FRONT |
H_streamice (i,j,bi,bj) = href |
|
./pkg/streamice/streamice_adv_front.F |
269 |
STREAMICE_ADV_FRONT |
H_streamice(i,j,bi,bj) = href + partial_vol * |
|
./pkg/streamice/streamice_adv_front.F |
272 |
STREAMICE_ADV_FRONT |
H_streamice(i,j,bi,bj) = href |
|
./pkg/streamice/streamice_advect_thickness.F |
200 |
STREAMICE_ADVECT_THICKNESS |
I H_streamice , |
|
./pkg/streamice/streamice_advect_thickness.F |
218 |
STREAMICE_ADVECT_THICKNESS |
h_after_uflux_SI (i,j,bi,bj) = H_streamice(i,j,bi,bj) - |
|
./pkg/streamice/streamice_advect_thickness.F |
285 |
STREAMICE_ADVECT_THICKNESS |
H_streamice (i,j,bi,bj) = |
|
./pkg/streamice/streamice_advect_thickness.F |
339 |
STREAMICE_ADVECT_THICKNESS |
& H_streamice (i,j,bi,bj))) THEN |
|
./pkg/streamice/streamice_advect_thickness.F |
340 |
STREAMICE_ADVECT_THICKNESS |
H_streamice (i,j,bi,bj) = 0. _d 0 |
|
./pkg/streamice/streamice_advect_thickness.F |
344 |
STREAMICE_ADVECT_THICKNESS |
H_streamice (i,j,bi,bj) = |
|
./pkg/streamice/streamice_advect_thickness.F |
345 |
STREAMICE_ADVECT_THICKNESS |
& H_streamice (i,j,bi,bj) + TMB * time_step_loc |
|
./pkg/streamice/streamice_advect_thickness.F |
355 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(H_streamice,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
69 |
STREAMICE_ADVECT_THICKNESS |
& H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_advect_thickness.F |
73 |
STREAMICE_ADVECT_THICKNESS |
h_after_uflux_SI(i,j,bi,bj) = H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_advect_thickness.F |
74 |
STREAMICE_ADVECT_THICKNESS |
h_after_vflux_SI(i,j,bi,bj) = H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
91 |
STREAMICE_COST_SURF_ACCUM |
& streamice_wgt_drift * (H_streamice(i,j,bi,bj)- |
|
./pkg/streamice/streamice_diagnostics_state.F |
46 |
STREAMICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(H_streamice,'SI_Thick', |
|
./pkg/streamice/streamice_driving_stress.F |
104 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i-1,j,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
117 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
128 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i,j,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
141 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i,j,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
157 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i,j-1,bi,bj)+ |
|
./pkg/streamice/streamice_driving_stress.F |
158 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j-1,bi,bj)) * |
|
./pkg/streamice/streamice_driving_stress.F |
165 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i-1,j-1,bi,bj) + H_streamice(i,j-1,bi,bj)) |
|
./pkg/streamice/streamice_driving_stress.F |
174 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i-1,j-1,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
187 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j-1,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
198 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i,j-1,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
211 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i,j-1,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
230 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i,j,bi,bj)+ |
|
./pkg/streamice/streamice_driving_stress.F |
231 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i,j-1,bi,bj)) * |
|
./pkg/streamice/streamice_driving_stress.F |
238 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i,j-1,bi,bj) + H_streamice(i,j,bi,bj)) |
|
./pkg/streamice/streamice_driving_stress.F |
247 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i,j-1,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
260 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i,j-1,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
271 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i,j,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
284 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i,j,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
300 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i-1,j,bi,bj)+ |
|
./pkg/streamice/streamice_driving_stress.F |
301 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j-1,bi,bj)) * |
|
./pkg/streamice/streamice_driving_stress.F |
308 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i-1,j-1,bi,bj) + H_streamice(i-1,j,bi,bj)) |
|
./pkg/streamice/streamice_driving_stress.F |
318 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i-1,j-1,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
331 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j-1,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
342 |
STREAMICE_DRIVING_STRESS |
& (streamice_density * H_streamice(i-1,j,bi,bj)**2 - |
|
./pkg/streamice/streamice_driving_stress.F |
355 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j,bi,bj)**2 |
|
./pkg/streamice/streamice_driving_stress.F |
87 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i,j,bi,bj)+ |
|
./pkg/streamice/streamice_driving_stress.F |
88 |
STREAMICE_DRIVING_STRESS |
& H_streamice(i-1,j,bi,bj)) * |
|
./pkg/streamice/streamice_driving_stress.F |
95 |
STREAMICE_DRIVING_STRESS |
& (H_streamice(i-1,j,bi,bj) + H_streamice(i,j,bi,bj)) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
103 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * rA(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
131 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * rA(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
152 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * .5 * dyF(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
165 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * .5 * dyF(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
194 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * rA(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
228 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * rA(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
257 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * rA(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
278 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * .5 * dxF(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
291 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * .5 * dxF(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
320 |
STREAMICE_DRIVING_STRESS_PPM |
& H_streamice(i,j,bi,bj) * rA(i,j,bi,bj) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
348 |
STREAMICE_DRIVING_STRESS_PPM |
& (streamice_density * H_streamice (i,j,bi,bj) ** 2 - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
352 |
STREAMICE_DRIVING_STRESS_PPM |
& (streamice_density * H_streamice (i,j,bi,bj) ** 2 - |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
358 |
STREAMICE_DRIVING_STRESS_PPM |
& streamice_density * H_streamice(i,j,bi,bj) ** 2 |
|
./pkg/streamice/streamice_forced_buttress.F |
57 |
STREAMICE_FORCED_BUTTRESS |
& (streamice_density * H_streamice(i,j,bi,bj)**2 - |
|
./pkg/streamice/streamice_forced_buttress.F |
68 |
STREAMICE_FORCED_BUTTRESS |
& H_streamice(i,j,bi,bj)**2 |
|
./pkg/streamice/streamice_init_varia.F |
216 |
STREAMICE_INIT_VARIA |
H_streamice (i,j,bi,bj) = shelf_min_draft |
|
./pkg/streamice/streamice_init_varia.F |
218 |
STREAMICE_INIT_VARIA |
H_streamice (i,j,bi,bj) = (shelf_min_draft + |
|
./pkg/streamice/streamice_init_varia.F |
231 |
STREAMICE_INIT_VARIA |
H_streamice(i,j,bi,bj) = 0.0 |
|
./pkg/streamice/streamice_init_varia.F |
252 |
STREAMICE_INIT_VARIA |
CALL READ_FLD_XY_RL( STREAMICEthickFile, ' ', H_streamice, |
|
./pkg/streamice/streamice_init_varia.F |
262 |
STREAMICE_INIT_VARIA |
IF (H_streamice(i,j,bi,bj).GT.0. _d 0) THEN |
|
./pkg/streamice/streamice_init_varia.F |
296 |
STREAMICE_INIT_VARIA |
CALL READ_FLD_XY_RL( STREAMICEthickFile, ' ', H_streamice, |
|
./pkg/streamice/streamice_init_varia.F |
551 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL(H_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
143 |
STREAMICE_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'SI_thick', H_streamice, |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
112 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& (1-rhoi/rhow)*H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
124 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& + H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
56 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
h = H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
95 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& H_streamice(i,j,bi,bj) * rhoi/rhow |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
98 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
& H_streamice(i,j,bi,bj) * rhoi/rhow |
|
./pkg/streamice/streamice_velmask_upd.F |
52 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RL( H_streamice, myThid ) |
|
./pkg/streamice/streamice_visc_beta.F |
101 |
STREAMICE_VISC_BETA |
& second_inv**((1-n_glen)/n_glen) * H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
150 |
STREAMICE_VISC_BETA_HYBRID |
& H_streamice(i,j,bi,bj) * streamice_delsigma (m) * |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
159 |
STREAMICE_VISC_BETA_HYBRID |
& H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
163 |
STREAMICE_VISC_BETA_HYBRID |
& H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
174 |
STREAMICE_VISC_BETA_HYBRID |
& * H_streamice(i,j,bi,bj)**2 |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
191 |
STREAMICE_VISC_BETA_HYBRID |
& streamice_omega(i,j,bi,bj) / H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
196 |
STREAMICE_VISC_BETA_HYBRID |
& streamice_omega(i,j,bi,bj) / H_streamice(i,j,bi,bj) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
209 |
STREAMICE_VISC_BETA_HYBRID |
& (1+fb*streamice_omega(i,j,bi,bj)/H_streamice(i,j,bi,bj)) |
|
./pkg/streamice/streamice_write_pickup.F |
111 |
STREAMICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, H_streamice, |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
124 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( H_streamice, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
98 |
CTRL_MAP_INI_GENARR |
H_streamice(i,j,bi,bj) = |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
99 |
CTRL_MAP_INI_GENARR |
& H_streamice(i,j,bi,bj) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
100 |
CTRL_MAP_INI_GENARR |
H_streamice(i,j,bi,bj) = |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
101 |
CTRL_MAP_INI_GENARR |
& H_streamice(i,j,bi,bj) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
131 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( H_streamice, myThid ) |