Changeset 8ed5f11 in flexpart.git for src/gfs_mod.f90

Timestamp:

Apr 7, 2016, 8:55:43 AM (8 years ago)

Author:

Espen Sollum ATMOS <eso@…>

Branches:

master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie

Children:

e31b3b5

Parents:

7e52e2e

Message:

Minor cosmetic changes

File:

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

src/gfs_mod.f90

@@ -22 +22 @@
 !*******************************************************************************
 !   Include file for calculation of particle trajectories (Program FLEXPART)   *
-!        This file contains GFS specific parameters used in FLEXPART           *
-!        Note that module name differs from file name.                         *
-!        The makefile selects either this file, or ecmwf_mod.f90, depending    *
-!        on target.                                                            *
 !                                                                              *
-!        Author: ESO                                                           *
+!       This file contains GFS specific parameters used in FLEXPART            *
+!       Note that module name differs from file name.                          *
+!       The makefile selects either this file, or ecmwf_mod.f90, depending     *
+!       on target.                                                             *
 !                                                                              *
-!        2015                                                                  *
+!       Author: ESO                                                            *
+!                                                                              *
+!       2015                                                                   *
 !                                                                              *
 !*******************************************************************************
@@ -44 +45 @@
   integer,parameter :: nxshift=0     ! for GFS or FNL
 
+  !*********************************************
+  ! Maximum dimensions of the nested input grids
+  !*********************************************
+
   integer,parameter :: maxnests=1,nxmaxn=361,nymaxn=181
+
+  ! nxmax,nymax        maximum dimension of wind fields in x and y
+  !                    direction, respectively
+  ! nuvzmax,nwzmax     maximum dimension of (u,v) and (w) wind fields in z
+  !                    direction (for fields on eta levels)
+  ! nzmax              maximum dimension of wind fields in z direction
+  !                    for the transformed Cartesian coordinates
+  ! nxshift            for global grids (in x), the grid can be shifted by
+  !                    nxshift grid points, in order to accomodate nested
+  !                    grids, and output grids overlapping the domain "boundary"
+  !                    nxshift must not be negative; "normal" setting would be 0
 end module wind_mod