/[lmdze]/trunk/dimens_m.f
ViewVC logotype

Contents of /trunk/dimens_m.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 23 - (show annotations)
Mon Dec 14 15:25:16 2009 UTC (14 years, 5 months ago) by guez
Original Path: trunk/libf/dimens_m.f90
File size: 338 byte(s)
Split "orografi.f": one file for each procedure. Put the created files
in new directory "Orography".

Removed argument "vcov" of procedure "sortvarc". Removed arguments
"itau" and "time" of procedure "caldyn0". Removed arguments "itau",
"time" and "vcov" of procedure "sortvarc0".

Removed argument "time" of procedure "dynredem1". Removed NetCDF
variable "temps" in files "start.nc" and "restart.nc", because its
value is always 0.

Removed argument "nq" of procedures "iniadvtrac" and "leapfrog". The
number of "tracers read in "traceur.def" must now be equal to "nqmx",
or "nqmx" must equal 4 if there is no file "traceur.def". Replaced
variable "nq" by constant "nqmx" in "leapfrog".

NetCDF variable for ozone field in "coefoz.nc" must now be called
"tro3" instead of "r".

Fixed bug in "zenang".

1 module dimens_m
2
3 ! Model dimensions.
4
5 implicit none
6
7 INTEGER, PARAMETER:: iim = 32 ! number of longitudes
8 INTEGER, PARAMETER:: jjm = 24 ! number of latitudes
9 INTEGER, PARAMETER:: llm = 11 ! number of vertical layers
10 INTEGER, PARAMETER:: ndm = 1
11 integer, parameter:: nqmx = 4 ! maximum number of tracers
12
13 end module dimens_m

  ViewVC Help
Powered by ViewVC 1.1.21