[Dart-dev] DART/branches Revision: 11253

dart at ucar.edu dart at ucar.edu
Wed Mar 8 16:56:32 MST 2017


hendric at ucar.edu
2017-03-08 16:56:32 -0700 (Wed, 08 Mar 2017)
49
character array all need to be the same lenght.




Modified: DART/branches/rma_trunk/models/cice/model_mod.f90
===================================================================
--- DART/branches/rma_trunk/models/cice/model_mod.f90	2017-03-08 23:33:40 UTC (rev 11252)
+++ DART/branches/rma_trunk/models/cice/model_mod.f90	2017-03-08 23:56:32 UTC (rev 11253)
@@ -3523,11 +3523,11 @@
 
 ! strings must all be the same length for the gnu compiler
 state_variables( 1:5*num_state_table_columns ) = &
-   (/ 'CONCENTRATION             ', 'QTY_SEAICE_CONCENTR      ', 'UPDATE                    ', &
-      'ICEVOLUME                 ', 'QTY_SEAICE_VOLUME        ', 'UPDATE                    ', &
-      'SNOWVOLUME                ', 'QTY_SEAICE_SNOWVOLUME    ', 'UPDATE                    ', &
-      'UICE                      ', 'QTY_U_SEAICE_COMPONENT   ', 'UPDATE                    ', &
-      'VICE                      ', 'QTY_V_SEAICE_COMPONENT   ', 'UPDATE                    '/)
+   (/ 'CONCENTRATION             ', 'QTY_SEAICE_CONCENTR       ', 'UPDATE                    ', &
+      'ICEVOLUME                 ', 'QTY_SEAICE_VOLUME         ', 'UPDATE                    ', &
+      'SNOWVOLUME                ', 'QTY_SEAICE_SNOWVOLUME     ', 'UPDATE                    ', &
+      'UICE                      ', 'QTY_U_SEAICE_COMPONENT    ', 'UPDATE                    ', &
+      'VICE                      ', 'QTY_V_SEAICE_COMPONENT    ', 'UPDATE                    '/)
 
 end subroutine use_default_state_variables
 


More information about the Dart-dev mailing list