--- MITgcm_contrib/dgoldberg/streamice/streamice_check.F	2012/03/29 15:59:21	1.1
+++ MITgcm_contrib/dgoldberg/streamice/streamice_check.F	2013/03/07 15:23:19	1.2
@@ -1,4 +1,4 @@
-C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/dgoldberg/streamice/streamice_check.F,v 1.1 2012/03/29 15:59:21 heimbach Exp $
+C $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/dgoldberg/streamice/streamice_check.F,v 1.2 2013/03/07 15:23:19 dgoldberg Exp $
 C $Name:  $
 
 #include "STREAMICE_OPTIONS.h"
@@ -60,7 +60,7 @@
        CALL WRITE_0D_RL( streamice_density_ocean_avg, INDEX_NONE, 
      & ' streamice_density_ocean_avg =', 
      & ' /* user defined parameter */')
-       CALL WRITE_0D_RL( A_glen_isothermal, INDEX_NONE, 
+       CALL WRITE_0D_RL( B_glen_isothermal, INDEX_NONE, 
      & ' glens law stifness =', 
      & ' /* user defined parameter */')
        CALL WRITE_0D_RL( n_glen, INDEX_NONE,