--- MITgcm_contrib/dgoldberg/streamice/STREAMICE.h 2012/05/14 16:47:10 1.2 +++ MITgcm_contrib/dgoldberg/streamice/STREAMICE.h 2012/05/17 21:30:17 1.3 @@ -44,6 +44,9 @@ C -------------------------- INT PARAMS --------------------------------------------------- + INTEGER streamice_max_nl + PARAMETER ( streamice_max_nl = 100 ) + COMMON /STREAMICE_PARMS_I/ & streamice_max_cg_iter, streamice_max_nl_iter, & streamice_vel_upd_counter, streamice_nstep_velocity, @@ -71,7 +74,7 @@ LOGICAL STREAMICE_tave_mnc LOGICAL STREAMICE_GL_regularize, STREAMICE_move_front LOGICAL STREAMICE_calve_to_mask -! LOGICAL STREAMICE_construct_matrix + LOGICAL STREAMICE_construct_matrix LOGICAL STREAMICE_lower_cg_tol COMMON /STREAMICE_PARM_L/ & STREAMICEison, @@ -79,7 +82,7 @@ & STREAMICE_dump_mnc, STREAMICE_tave_mnc, & STREAMICE_GL_regularize, STREAMICE_move_front, & STREAMICE_calve_to_mask, -! & STREAMICE_construct_matrix, + & STREAMICE_construct_matrix, & STREAMICE_lower_cg_tol C -------------------------- AND NOW ARRAYS ---------------------------------------------------