Changeset e4b7087 in flexpart.git

Timestamp:

Sep 4, 2016, 5:41:49 PM (8 years ago)

Author:

Don Morton <Don.Morton@…>

Branches:

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

Children:

da10dc8

Parents:

7e6dc50

Message:

For CTBTO standardization, set number of levels in par_mod.F90 from 140
to 138.

File:

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

flexpart_code/par_mod.F90

@@ -130 +130 @@
   !integer,parameter :: nxmax=361,nymax=181,nuvzmax=92,nwzmax=92,nzmax=92
   !integer,parameter :: nxmax=361,nymax=181,nuvzmax=61,nwzmax=61,nzmax=61
-  integer,parameter :: nxmax=721,nymax=361,nuvzmax=140,nwzmax=140,nzmax=140
+  integer,parameter :: nxmax=721,nymax=361,nuvzmax=138,nwzmax=138,nzmax=138
   !integer,parameter :: nxshift=359  ! for ECMWF
   integer,parameter :: nxshift=0     ! for GFS