[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