| 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) |