Changes from branches/FLEXPART_9.1.3/src/par_mod.f90 at r13 to trunk/src/par_mod.f90 at r4
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/src/par_mod.f90
- Property svn:executable set to *
r13 r4 28 28 ! 1997 * 29 29 ! * 30 ! Last update 1 5 August 2013 IP*30 ! Last update 10 August 2000 * 31 31 ! * 32 32 !******************************************************************************* … … 122 122 123 123 integer,parameter :: nxmax=361,nymax=181,nuvzmax=92,nwzmax=92,nzmax=92 124 !integer,parameter :: nxmax=361,nymax=181,nuvzmax= 26,nwzmax=26,nzmax=26124 !integer,parameter :: nxmax=361,nymax=181,nuvzmax=61,nwzmax=61,nzmax=61 125 125 !integer,parameter :: nxmax=721,nymax=361,nuvzmax=64,nwzmax=64,nzmax=64 126 !integer,parameter :: nxmax=1201,nymax=235,nuvzmax=58,nwzmax=58,nzmax=58 127 integer,parameter :: nxshift=359 ! for ECMWF 126 integer,parameter :: nxshift=359 ! for ECMWF 128 127 !integer,parameter :: nxshift=0 ! for GFS 129 128 … … 151 150 !********************************************* 152 151 153 !integer,parameter :: maxnests=0, nxmaxn=0, nymaxn=0154 integer,parameter :: maxnests=1,nxmaxn=251,nymaxn=151152 integer,parameter :: maxnests=0, nxmaxn=0, nymaxn=0 153 !integer,parameter :: maxnests=1,nxmaxn=251,nymaxn=151 155 154 156 155 ! maxnests maximum number of nested grids … … 195 194 !************************************************** 196 195 197 integer,parameter :: maxpart= 150000198 integer,parameter :: maxspec= 1196 integer,parameter :: maxpart=2000000 197 integer,parameter :: maxspec=4 199 198 200 199 … … 259 258 integer,parameter :: unitboundcond=89 260 259 261 !******************************************************262 ! integer code for missing values, used in wet scavenging (PS, 2012)263 !******************************************************264 265 integer icmv266 parameter(icmv=-9999)267 268 260 end module par_mod
Note: See TracChangeset
for help on using the changeset viewer.