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 ...@@ -147,7 +147,7 @@ module par_mod
! ECMWF ! 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=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=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 ! 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 ...@@ -159,7 +159,7 @@ module par_mod
! Maximum dimensions of the nested input grids ! 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 ! nxmax,nymax maximum dimension of wind fields in x and y
! direction, respectively ! direction, respectively
...@@ -208,7 +208,7 @@ module par_mod ...@@ -208,7 +208,7 @@ module par_mod
!integer maxxgrid,maxygrid,maxzgrid,maxxgridn,maxygridn !integer maxxgrid,maxygrid,maxzgrid,maxxgridn,maxygridn
!integer,parameter :: maxxgrid=361,maxygrid=181,maxxgridn=0,maxygridn=0) !integer,parameter :: maxxgrid=361,maxygrid=181,maxxgridn=0,maxygridn=0)
integer,parameter :: maxreceptor=200 integer,parameter :: maxreceptor=20
! maxreceptor maximum number of receptor points ! maxreceptor maximum number of receptor points
...@@ -217,8 +217,8 @@ module par_mod ...@@ -217,8 +217,8 @@ module par_mod
! Maximum number of particles, species, and similar ! Maximum number of particles, species, and similar
!************************************************** !**************************************************
integer,parameter :: maxpart=30000000 integer,parameter :: maxpart=100000
integer,parameter :: maxspec=6 integer,parameter :: maxspec=1
real,parameter :: minmass=0.0001 real,parameter :: minmass=0.0001
...@@ -261,7 +261,7 @@ module par_mod ...@@ -261,7 +261,7 @@ module par_mod
! Dimension of random number field ! Dimension of random number field
!********************************* !*********************************
integer,parameter :: maxrand=200000000 integer,parameter :: maxrand=1000000
! maxrand number of random numbers used ! maxrand number of random numbers used
......
Supports Markdown
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