Changeset b4d29ce in flexpart.git for src/gridcheck_gfs.f90

Timestamp:

Jul 3, 2014, 2:55:50 PM (10 years ago)

Author:

Harald Sodemann <harald.sodemann@…>

Branches:

master, 10.4.1_pesei, FPv9.3.1, FPv9.3.1b_testing, FPv9.3.2, GFS_025, NetCDF, bugfixes+enhancements, deposition, dev, fp9.3.1-20161214-nc4, grib2nc4_repair, inputlist, laptop, release-10, release-10.4.1, scaling-bug, svn-petra, svn-trunk, univie

Children:

4b093cc, 75dfd42, 326b31b

Parents:

87910af

Message:

• Implemented optional namelist input for COMMAND, RELEASES, SPECIES, AGECLASSES,OUTGRID,OUTGRID_NEST,RECEPTORS
• Implemented com_mod switch nmlout to write input files as namelist to the output directory (.true. by default)
• Proposed updated startup and runtime output (may change back to previous info if desired)

git-svn-id: ​http://flexpart.flexpart.eu:8088/svn/FlexPart90/trunk@27 ef8cc7e1-21b7-489e-abab-c1baa636049d

File:

• src/gridcheck_gfs.f90 (modified) (2 diffs)

src/gridcheck_gfs.f90

@@ -423 +423 @@
   write(*,*)
   write(*,*)
-  write(*,'(a,2i7)') '# of vertical levels in NCEP data: ', &
+  write(*,'(a,2i7)') 'Vertical levels in NCEP data: ', &
        nuvz,nwz
   write(*,*)
@@ -429 +429 @@
   write(*,'(a,f10.2,a1,f10.2,a,f10.2)') '  Longitude range: ', &
        xlon0,' to ',xlon0+(nx-1)*dx,'   Grid distance: ',dx
-  write(*,'(a,f10.2,a1,f10.2,a,f10.2)') '  Latitude range: ', &
+  write(*,'(a,f10.2,a1,f10.2,a,f10.2)') '  Latitude range : ', &
        ylat0,' to ',ylat0+(ny-1)*dy,'   Grid distance: ',dy
   write(*,*)