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

Annotation of /trunk/dimens_m.f

Parent Directory Parent Directory | Revision Log Revision Log


Revision 18 - (hide annotations)
Thu Aug 7 12:29:13 2008 UTC (15 years, 9 months ago) by guez
Original Path: trunk/libf/dimens_m.f90
File size: 337 byte(s)
In module "regr_pr", rewrote scanning of horizontal positions as a
single set of loops, using a mask.

Added some "intent" attributes.

In "dynredem0", replaced calls to Fortran 77 interface of NetCDF by
calls to NetCDF95. Removed calls to "nf_redef", regrouped all writing
operations. In "dynredem1", replaced some calls to Fortran 77
interface of NetCDF by calls to Fortran 90 interface.

Renamed variable "nqmax" to "nq_phys".

In "physiq", if "nq >= 5" then "wo" is computed from the
parameterization of "Cariolle".

1 guez 3 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 guez 18 INTEGER, PARAMETER:: llm = 9 ! number of vertical layers
10 guez 3 INTEGER, PARAMETER:: ndm = 1
11 guez 7 integer, parameter:: nqmx = 5 ! maximum number of tracers
12 guez 3
13     end module dimens_m

  ViewVC Help
Powered by ViewVC 1.1.21