Changeset 3522 for branches/2012/dev_r3452_UKMO2_DIADCT/NEMOGCM/TOOLS/SECTIONS_DIADCT/src/declarations.f90
- Timestamp:
- 2012-10-31T11:44:19+01:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2012/dev_r3452_UKMO2_DIADCT/NEMOGCM/TOOLS/SECTIONS_DIADCT/src/declarations.f90
r3519 r3522 12 12 !! * Shared module variables 13 13 INTEGER, PUBLIC, PARAMETER :: dp=8 , sp=4, wp=dp 14 INTEGER, PUBLIC, PARAMETER :: nb_class_max = 1 3! Max number of classes14 INTEGER, PUBLIC, PARAMETER :: nb_class_max = 10 ! Max number of classes 15 15 INTEGER, PUBLIC, PARAMETER :: nb_sec_max = 150 ! Max number of sections 16 16 INTEGER, PUBLIC, PARAMETER :: nb_point_max = 2000 ! Max number of segments per section 17 INTEGER, PUBLIC, PARAMETER :: nb_type_class = 1 4! Max number of types of classes17 INTEGER, PUBLIC, PARAMETER :: nb_type_class = 10 ! Max number of types of classes 18 18 INTEGER, PUBLIC, PARAMETER :: numnam=3 ! Unit for namelist 19 19 INTEGER, PUBLIC, PARAMETER :: numdctin=1 ! Unit for input file
Note: See TracChangeset
for help on using the changeset viewer.