Changeset 87d9684 in flexpart.git for flexpart_code/grib2nc4/fp2nc4io_mod.F90

Timestamp:

Jun 13, 2016, 8:04:06 PM (8 years ago)

Author:

Don Morton <Don.Morton@…>

Branches:

FPv9.3.1, FPv9.3.1b_testing, FPv9.3.2, fp9.3.1-20161214-nc4, grib2nc4_repair

Children:

48a5c5c

Parents:

496c607

Message:

Minor changes in grib2nc4 for FPv9.3.1.

See Ticket #150

File:

• flexpart_code/grib2nc4/fp2nc4io_mod.F90 (modified) (1 diff)

flexpart_code/grib2nc4/fp2nc4io_mod.F90

@@ -26 +26 @@
 
     ! These are valid variable names for the user of this module to reference
-    CHARACTER, DIMENSION(*), PARAMETER :: VALID_VARS = &
+    !!!  DJM - 2016-06-13 -- added specific value in DIMENSION statement.
+    !!!                      can't be "*" in some Fortran versions
+    CHARACTER, DIMENSION(10), PARAMETER :: VALID_VARS = &
 &           (/ 't', 'u', 'v', 'w', 'q',                &
 &              'T', 'U', 'V', 'W', 'Q' /)