Changeset 5635973 in flexpart.git for src/par_mod.f90

Timestamp:

Nov 27, 2020, 9:57:54 AM (3 years ago)

Author:

Espen Sollum ATMOS <eso@…>

Branches:

GFS_025, dev

Children:

a4288fa

Parents:

f06b72a

Message:

Change of output format for trajectories.txt

File:

• src/par_mod.f90 (modified) (3 diffs)

src/par_mod.f90

@@ -133 +133 @@
   ! ECMWF
 ! integer,parameter :: nxmax=361,nymax=181,nuvzmax=92,nwzmax=92,nzmax=92,nxshift=359 ! 1.0 degree 92 level
-  integer,parameter :: nxmax=361,nymax=181,nuvzmax=138,nwzmax=138,nzmax=138,nxshift=0 ! 1.0 degree 138 level
+!  integer,parameter :: nxmax=361,nymax=181,nuvzmax=138,nwzmax=138,nzmax=138,nxshift=0 ! 1.0 degree 138 level
 !   integer,parameter :: nxmax=361,nymax=181,nuvzmax=138,nwzmax=138,nzmax=138,nxshift=359 ! 1.0 degree 138 level
 ! integer,parameter :: nxmax=721,nymax=361,nuvzmax=138,nwzmax=138,nzmax=138,nxshift=359  ! 0.5 degree 138 level
@@ -139 +139 @@
 
 ! GFS
-   ! integer,parameter :: nxmax=361,nymax=181,nuvzmax=138,nwzmax=138,nzmax=138
-   ! integer :: nxshift=0 ! shift not fixed for the executable 
+   integer,parameter :: nxmax=361,nymax=181,nuvzmax=138,nwzmax=138,nzmax=138
+   integer :: nxshift=0 ! shift not fixed for the executable 
 
 
@@ -205 +205 @@
   !**************************************************
 
-  integer,parameter :: maxpart=1000000
+  integer,parameter :: maxpart=100000
   integer,parameter :: maxspec=6