Commit 1f55de11 authored by Ignacio Pisso's avatar Ignacio Pisso
Browse files

Reduce default size of statically allocated arrays

parent ccc9ec26
......@@ -147,7 +147,7 @@ module par_mod
! 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=359 ! 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
! integer,parameter :: nxmax=181,nymax=91,nuvzmax=92,nwzmax=92,nzmax=92,nxshift=0 ! CERA 2.0 degree 92 level
......@@ -159,7 +159,7 @@ module par_mod
! Maximum dimensions of the nested input grids
!*********************************************
integer,parameter :: maxnests=1,nxmaxn=451,nymaxn=426
integer,parameter :: maxnests=0,nxmaxn=0,nymaxn=0
! nxmax,nymax maximum dimension of wind fields in x and y
! direction, respectively
......@@ -208,7 +208,7 @@ module par_mod
!integer maxxgrid,maxygrid,maxzgrid,maxxgridn,maxygridn
!integer,parameter :: maxxgrid=361,maxygrid=181,maxxgridn=0,maxygridn=0)
integer,parameter :: maxreceptor=200
integer,parameter :: maxreceptor=20
! maxreceptor maximum number of receptor points
......@@ -217,8 +217,8 @@ module par_mod
! Maximum number of particles, species, and similar
!**************************************************
integer,parameter :: maxpart=30000000
integer,parameter :: maxspec=6
integer,parameter :: maxpart=100000
integer,parameter :: maxspec=1
real,parameter :: minmass=0.0001
......@@ -261,7 +261,7 @@ module par_mod
! Dimension of random number field
!*********************************
integer,parameter :: maxrand=200000000
integer,parameter :: maxrand=1000000
! maxrand number of random numbers used
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment