Changeset 48a5c5c in flexpart.git for flexpart_code/convertfields.F90

Timestamp:

Aug 22, 2016, 3:52:53 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:

f155f96

Parents:

87d9684

Message:

Added in AWST mods for extensionless FP filenames and
new CTBTO message for GRIB2FLEXPART

File:

• flexpart_code/convertfields.F90 (modified) (1 diff)

flexpart_code/convertfields.F90

@@ -139 +139 @@
        
           if ( ldirect.eq.1 ) then
-              fpfname = TRIM(filename) // '_fwd.fp'
+              fpfname = TRIM(filename) 
           else
-              fpfname = TRIM(filename) // '_bwd.fp'
+              fpfname = TRIM(filename)
           endif
           print *, 'writing ',  TRIM(dumpPath) // '/' //  TRIM(fpfname)