38 |
& A_glen_isothermal, n_glen, eps_glen_min, |
& A_glen_isothermal, n_glen, eps_glen_min, |
39 |
& C_basal_fric_const, n_basal_friction, |
& C_basal_fric_const, n_basal_friction, |
40 |
& streamice_vel_update,streamice_cg_tol,streamice_nonlin_tol, |
& streamice_vel_update,streamice_cg_tol,streamice_nonlin_tol, |
41 |
|
& streamice_nonlin_tol_fp, |
42 |
& streamice_max_cg_iter, streamice_max_nl_iter, |
& streamice_max_cg_iter, streamice_max_nl_iter, |
43 |
& STREAMICE_GL_regularize, |
& STREAMICE_GL_regularize, |
44 |
& STREAMICEthickInit, |
& STREAMICEthickInit, |
45 |
|
& STREAMICEsigcoordInit, |
46 |
|
& STREAMICEsigcoordFile, |
47 |
& STREAMICEthickFile, |
& STREAMICEthickFile, |
48 |
& STREAMICEcalveMaskFile, |
& STREAMICEcalveMaskFile, |
49 |
& STREAMICEison, |
& STREAMICEison, |
51 |
& STREAMICE_dump_mnc, STREAMICE_tave_mnc, |
& STREAMICE_dump_mnc, STREAMICE_tave_mnc, |
52 |
& STREAMICE_GL_regularize, STREAMICE_move_front, |
& STREAMICE_GL_regularize, STREAMICE_move_front, |
53 |
& STREAMICE_calve_to_mask, |
& STREAMICE_calve_to_mask, |
54 |
|
& STREAMICE_diagnostic_only, |
55 |
! & STREAMICE_construct_matrix, |
! & STREAMICE_construct_matrix, |
56 |
& STREAMICE_lower_cg_tol, |
& STREAMICE_lower_cg_tol, |
57 |
& streamice_CFL_factor |
& streamice_CFL_factor, |
58 |
|
& streamice_adjDump, |
59 |
|
! & STREAMICE_hybrid_stress, |
60 |
|
& streamice_bg_surf_slope_x, streamice_bg_surf_slope_y, |
61 |
|
& streamice_kx_b_init, streamice_ky_b_init, |
62 |
|
& STREAMICEbasalTracConfig, |
63 |
|
& STREAMICEbasalTracFile, |
64 |
|
& STREAMICEvelOptimFile |
65 |
|
|
66 |
|
|
67 |
NAMELIST /STREAMICE_PARM02/ |
NAMELIST /STREAMICE_PARM02/ |
68 |
& shelf_max_draft, |
& shelf_max_draft, |
94 |
& min_y_CFBC_WEST, max_y_CFBC_WEST, |
& min_y_CFBC_WEST, max_y_CFBC_WEST, |
95 |
& min_y_CFBC_EAST, max_y_CFBC_EAST, |
& min_y_CFBC_EAST, max_y_CFBC_EAST, |
96 |
& flux_bdry_val_SOUTH, flux_bdry_val_NORTH, |
& flux_bdry_val_SOUTH, flux_bdry_val_NORTH, |
97 |
& flux_bdry_val_WEST, flux_bdry_val_EAST |
& flux_bdry_val_WEST, flux_bdry_val_EAST, |
98 |
|
& STREAMICE_NS_periodic, STREAMICE_EW_periodic |
99 |
|
|
100 |
_BEGIN_MASTER(myThid) |
_BEGIN_MASTER(myThid) |
101 |
|
|
111 |
streamice_vel_update = 169200. ! seconds |
streamice_vel_update = 169200. ! seconds |
112 |
streamice_cg_tol = 1e-6 |
streamice_cg_tol = 1e-6 |
113 |
streamice_nonlin_tol = 1e-6 |
streamice_nonlin_tol = 1e-6 |
114 |
|
streamice_nonlin_tol_fp = 1.e-14 |
115 |
streamice_max_cg_iter = 2000 |
streamice_max_cg_iter = 2000 |
116 |
streamice_max_nl_iter = 100 |
streamice_max_nl_iter = 100 |
117 |
streamice_n_sub_regularize = 4 |
streamice_n_sub_regularize = 4 |
118 |
streamice_CFL_factor = .5 |
streamice_CFL_factor = .5 |
119 |
|
streamice_adjDump = 0. |
120 |
|
streamice_bg_surf_slope_x = .0 |
121 |
|
streamice_bg_surf_slope_y = 0. |
122 |
|
streamice_kx_b_init = 1. |
123 |
|
streamice_ky_b_init = 1. |
124 |
|
|
125 |
STREAMICEthickInit = 'FILE' |
STREAMICEthickInit = 'FILE' |
126 |
STREAMICEthickFile = ' ' |
STREAMICEthickFile = ' ' |
127 |
STREAMICEcalveMaskFile = ' ' |
STREAMICEcalveMaskFile = ' ' |
128 |
|
STREAMICEsigcoordInit = 'UNIFORM' |
129 |
|
STREAMICEsigcoordFile = ' ' |
130 |
|
STREAMICEbasalTracConfig = 'UNIFORM' |
131 |
|
STREAMICEbasalTracFile = ' ' |
132 |
|
STREAMICEvelOptimFile = '' |
133 |
|
|
134 |
STREAMICEison = .TRUE. |
STREAMICEison = .TRUE. |
135 |
STREAMICE_tave_mdsio = .TRUE. |
STREAMICE_tave_mdsio = .TRUE. |
141 |
STREAMICE_calve_to_mask = .FALSE. |
STREAMICE_calve_to_mask = .FALSE. |
142 |
! STREAMICE_construct_matrix = .TRUE. |
! STREAMICE_construct_matrix = .TRUE. |
143 |
STREAMICE_lower_cg_tol = .FALSE. |
STREAMICE_lower_cg_tol = .FALSE. |
144 |
|
STREAMICE_diagnostic_only = .FALSE. |
145 |
|
! STREAMICE_hybrid_stress= .FALSE. |
146 |
|
|
147 |
min_x_noflow_NORTH = 0. |
min_x_noflow_NORTH = 0. |
148 |
max_x_noflow_NORTH = 0. |
max_x_noflow_NORTH = 0. |
185 |
flux_bdry_val_WEST = 0. |
flux_bdry_val_WEST = 0. |
186 |
flux_bdry_val_EAST = 0. |
flux_bdry_val_EAST = 0. |
187 |
|
|
188 |
|
STREAMICE_NS_periodic = .FALSE. |
189 |
|
STREAMICE_EW_periodic = .FALSE. |
190 |
|
|
191 |
WRITE(msgBuf,'(A)') 'STREAMICE_READPARMS: opening data.streamice' |
WRITE(msgBuf,'(A)') 'STREAMICE_READPARMS: opening data.streamice' |
192 |
CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, |
CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, |