| 1 | MODULE PARFPOS |
|---|
| 2 | |
|---|
| 3 | #include "tsmbkind.h" |
|---|
| 4 | |
|---|
| 5 | USE PARDIM |
|---|
| 6 | |
|---|
| 7 | |
|---|
| 8 | IMPLICIT NONE |
|---|
| 9 | |
|---|
| 10 | SAVE |
|---|
| 11 | |
|---|
| 12 | ! ------------------------------------------------------------------ |
|---|
| 13 | |
|---|
| 14 | ! === basic dimensions for Full POST-PROCESSING === |
|---|
| 15 | |
|---|
| 16 | ! JPOSDOM : Maximum number of horizontal (sub)domains |
|---|
| 17 | ! JPOSFRQ : Maximum number of output frequencies |
|---|
| 18 | ! JPOSLEN : Maximum length of a (sub)domain name |
|---|
| 19 | ! JPOSLIS : Maximum number of groups of subdomains |
|---|
| 20 | ! JPOSDIR : Maximum length of the path (or prefix) for the output files |
|---|
| 21 | ! JPOSLE : Maximum number of eta levels on the output subdomain |
|---|
| 22 | ! JPOSGL : Maximum number of latitude rows of the output gaussian grid |
|---|
| 23 | ! JPOS3DF : Maximum number of specific 3D dynamic fields |
|---|
| 24 | ! JPOSSCVA: Maximum number of post-processable passive scalars |
|---|
| 25 | ! JPOS2DF : Maximum number of specific 2D dynamic fields |
|---|
| 26 | ! JPOSPHY : Maximum number of surface fields |
|---|
| 27 | ! JPOSCFU : Maximum number of cumulated fluxes |
|---|
| 28 | ! JPOSXFU : Maximum number of instantaneous fluxes |
|---|
| 29 | ! JPOS3P : Maximum number of pp. pressure levels |
|---|
| 30 | ! JPOS3H : Maximum number of pp. height (above orography) levels |
|---|
| 31 | ! JPOS3TH : Maximum number of pp. potential temperature levels |
|---|
| 32 | ! JPOS3PV : Maximum number of pp. potential vorticity levels |
|---|
| 33 | ! JPOS3S : Maximum number of pp. eta levels |
|---|
| 34 | ! JPOSVSO : Maximum number of climatologic fields of output format |
|---|
| 35 | |
|---|
| 36 | |
|---|
| 37 | INTEGER_M, PARAMETER :: JPOSDOM=15 |
|---|
| 38 | INTEGER_M, PARAMETER :: JPOSFRQ=10 |
|---|
| 39 | INTEGER_M, PARAMETER :: JPOSLEN=10 |
|---|
| 40 | INTEGER_M, PARAMETER :: JPOSLIS=10 |
|---|
| 41 | INTEGER_M, PARAMETER :: JPOSDIR=180 |
|---|
| 42 | INTEGER_M, PARAMETER :: JPOSLE=JPMXLE |
|---|
| 43 | INTEGER_M, PARAMETER :: JPOSGL=JPMXGL |
|---|
| 44 | INTEGER_M, PARAMETER :: JPOS3DF=63 |
|---|
| 45 | INTEGER_M, PARAMETER :: JPOS2DF=15 |
|---|
| 46 | INTEGER_M, PARAMETER :: JPOSPHY=127 |
|---|
| 47 | INTEGER_M, PARAMETER :: JPOSCFU=63 |
|---|
| 48 | INTEGER_M, PARAMETER :: JPOSXFU=63 |
|---|
| 49 | INTEGER_M, PARAMETER :: JPOS3P=31 |
|---|
| 50 | INTEGER_M, PARAMETER :: JPOS3H=127 |
|---|
| 51 | INTEGER_M, PARAMETER :: JPOS3TH=15 |
|---|
| 52 | INTEGER_M, PARAMETER :: JPOS3PV=15 |
|---|
| 53 | INTEGER_M, PARAMETER :: JPOS3S=JPOSLE |
|---|
| 54 | INTEGER_M, PARAMETER :: JPOSVSO=31 |
|---|
| 55 | INTEGER_M, PARAMETER :: JPOSSCVA=3 |
|---|
| 56 | ! ------------------------------------------------------------------ |
|---|
| 57 | END MODULE PARFPOS |
|---|
