6 |
|
|
7 |
COMMON /STREAMICE_PARMS_R/ |
COMMON /STREAMICE_PARMS_R/ |
8 |
& streamice_density, streamice_density_ocean_avg, |
& streamice_density, streamice_density_ocean_avg, |
9 |
& A_glen_isothermal, n_glen, eps_glen_min, |
& A_glen_isothermal, n_glen, eps_glen_min, eps_u_min, |
10 |
& C_basal_fric_const, n_basal_friction, streamice_input_flux_unif, |
& C_basal_fric_const, n_basal_friction, streamice_input_flux_unif, |
11 |
& streamice_vel_update, streamice_cg_tol, streamice_nonlin_tol, |
& streamice_vel_update, streamice_cg_tol, streamice_nonlin_tol, |
12 |
& streamice_nonlin_tol_fp, |
& streamice_nonlin_tol_fp, |
14 |
& streamice_bg_surf_slope_x, streamice_bg_surf_slope_y, |
& streamice_bg_surf_slope_x, streamice_bg_surf_slope_y, |
15 |
& streamice_kx_b_init, streamice_ky_b_init, |
& streamice_kx_b_init, streamice_ky_b_init, |
16 |
& streamice_wgt_drift, streamice_wgt_surf, |
& streamice_wgt_drift, streamice_wgt_surf, |
17 |
& streamice_wgt_avthick, streamice_wgt_vel |
& streamice_wgt_avthick, streamice_wgt_vel, |
18 |
|
& streamice_addl_backstress |
19 |
_RL streamice_density, streamice_density_ocean_avg |
_RL streamice_density, streamice_density_ocean_avg |
20 |
_RL A_glen_isothermal, n_glen, eps_glen_min |
_RL A_glen_isothermal, n_glen, eps_glen_min, eps_u_min |
21 |
_RL C_basal_fric_const |
_RL C_basal_fric_const |
22 |
_RL n_basal_friction |
_RL n_basal_friction |
23 |
_RL streamice_input_flux_unif |
_RL streamice_input_flux_unif |
30 |
_RL streamice_kx_b_init, streamice_ky_b_init |
_RL streamice_kx_b_init, streamice_ky_b_init |
31 |
_RL streamice_wgt_drift, streamice_wgt_surf |
_RL streamice_wgt_drift, streamice_wgt_surf |
32 |
_RL streamice_wgt_avthick, streamice_wgt_vel |
_RL streamice_wgt_avthick, streamice_wgt_vel |
33 |
|
_RL streamice_addl_backstress |
34 |
|
|
35 |
|
|
36 |
C parms for parameterized initial thickness |
C parms for parameterized initial thickness |
172 |
& STREAMICE_ufacemask_bdry, |
& STREAMICE_ufacemask_bdry, |
173 |
& STREAMICE_vfacemask_bdry, |
& STREAMICE_vfacemask_bdry, |
174 |
& STREAMICE_float_cond, |
& STREAMICE_float_cond, |
175 |
& STREAMICE_calve_mask |
& STREAMICE_calve_mask, |
176 |
|
& STREAMICE_ctrl_mask |
177 |
_RS STREAMICE_hmask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS STREAMICE_hmask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
178 |
_RS STREAMICE_umask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS STREAMICE_umask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
179 |
_RS STREAMICE_vmask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS STREAMICE_vmask (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
189 |
& (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
& (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
190 |
_RS STREAMICE_calve_mask |
_RS STREAMICE_calve_mask |
191 |
& (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
& (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
192 |
|
_RS STREAMICE_ctrl_mask |
193 |
|
& (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy,Nr) |
194 |
|
|
195 |
C NOTES : |
C NOTES : |
196 |
C STREAMICE_ufacemask_bdry, STREAMICE_vfacemask_bdry ARE CONSTANT (FIXED) |
C STREAMICE_ufacemask_bdry, STREAMICE_vfacemask_bdry ARE CONSTANT (FIXED) |