LMDZ
yomlun.F90
Go to the documentation of this file.
1 MODULE yomlun
2 
3 
4 #include "tsmbkind.h"
5 
6 IMPLICIT NONE
7 
8 SAVE
9 
10 ! ------------------------------------------------------------------
11 
12 !* Logical units used by code
13 
14 ! NULOUT : output unit
15 ! NULNAM : unit number for namelist
16 ! NORZUN : UNIT NO. FOR TEMP HEIGHT ERROR CORRELATION
17 ! NCMAFL : UNIT NUMBERS FOR CMA FILES
18 ! NULCL1 : unit number for climatological fields (month before)
19 ! NULCL2 : unit number for climatological fields (month after)
20 ! NTRJSH : unit number for trajectory spectral data WRTRA
21 ! NTRJGG : unit number for trajectory grid-point data WRTRA
22 ! NINMSH : unit number for initial point of the minimization SUVAZX
23 ! NINMGG : unit number for initial point of the minimization SUVAZX
24 ! NINISH : unit number for initial spectral data SUSPEC
25 ! NINIGG : unit number for initial grid-point data SUSPEC
26 ! NFGISH : unit number for first-guess spectral data
27 ! NFGIGG : unit number for first-guess grid-point data
28 ! NPOSSH : output unit number (spectral fields) CPREP1
29 ! NPOSGG : output unit number (grid point fields) CPREP1
30 ! NSPHMO : unit number for conversion matrix (to normal mode space)
31 ! NHOUMO : unit number for conversion matrix (from normal mode space)
32 ! NPINMI : unit number for partially implicit NMI help arrays
33 ! NFREQ2 : unit number for freqencies arrays FREQ and FREQ2 (YOMNMI)
34 ! NSAVSP : unit number for saving spectral arrays (CNMI)
35 ! NTIDE : unit number for the LFI file containing the total tendencies
36 ! NLTYPE : unit number for LTYPGR, LTYPDB and LTYPTD arrays (YOMNMI)
37 ! NPDIRL : unit number for post-processing directory listing
38 ! NPPPSH : unit number for post-processed spherical harmonics WRPLPP
39 ! NPPGG : unit number for post-processed grid-point fields WRPLPP
40 ! NFCER0 : unit number for forecast errors on standard error grid
41 ! NFCERZ : unit number for horizontally interpolated forecast errors
42 ! in field form.
43 ! NFCERH : unit number for horizontally interpolated forecast errors
44 ! in line form.
45 ! NFCEVC : unit number for compressed error climatology file
46 ! NFCSPG : unit number for spectral first guess field
47 
48 ! NFFUNC : unit number for Fspalt(1,jlev,jvar) and Fspsur(1,1) with the
49 ! number of simulations. EVCOST
50 ! NFSPNC : unit number for Fspalt(jlev,jvar,jn) and Fspsur(1,jn)
51 ! with the number of simulations. EVCOST
52 ! NFDIT0 : unit number for global distance at t0 with the
53 ! number of simulations. SIM4D
54 ! NFSPT0 : unit number for distance at t0 (by field and wave number)
55 ! at the begining and at the end of the minimisation COSTRA
56 
57 ! NULZDID: unit number for zonal diagnostics of dynamics (ZODIA).
58 ! NULZDIF: unit number for zonal diagnostics of physical fluxes (ZODIA).
59 
60 ! NULDILA: unit number for dilatation matrix (SUDIL,DILAT,SPDILA)
61 ! NULCONT: unit number for contraction matrix (SUDIL,DILAT,SPDILA)
62 ! NULROTS: unit number for lower troncature rotation matrix (SUROT,SPORTS)
63 ! NULROTC: unit number for upper troncature rotation matrix (SUROT,SPORTS)
64 
65 ! NULLEG : unit number for Legendre polynomials
66 ! NULCO : unit number for coupled fields (ICMCO)
67 ! NPODDH : unit number for mask diagnostic files (DDH)
68 ! NULRCF : unit number for restart control file
69 ! NULHWF : unit number for history witness file
70 ! NBIAS : unit number for bias (dig. filt. guess - guess)
71 
72 ! NEFLS : unit number for coupling ALADIN file
73 ! NEFLSS : unit number for coupling ALADIN file (initialisation)
74 
75 ! NULUSR1: unit numbers for user defined files
76 ! NULDISP: unit number for display file
77 ! NULSTAT: unit number for status file
78 
79 ! NULASE : unit number for CANARI statistics (forecast error s.d.)
80 ! NULASS : unit number for CANARI statistics (analysis error s.d.)
81 
82 ! NULUSR2
83 ! NULUSR3
84 ! NULUSR4
85 ! NULUSR5
86 ! NULTMP : unit numbers for file opened and closed in the same routine
87 
88 ! NULFPxx unit numbers for Full-POS output files
89 ! NSCRTCH: unit number for Full-POS scratch file (for in-line post-proc.)
90 ! NULFPOS: unit number for Full-POS control file (end of post-processing
91 ! in conf. 001 ; auxilary namelist file in conf. 927)
92 ! NULDIA : unit number for error diagnostics
93 ! NULERR : unit number for comparison with reference run
94 ! NULREF : unit number for storing reference run
95 ! NULTIM : unit number for storing timing information for DM run
96 ! NULRAD : unit number for writing radiation diagnostics
97 ! NUO3CH1: unit number for reading ozone chemistry file 1
98 ! NUO3CH2: unit number for reading ozone chemistry file 2
99 ! NTCSR : unit number for fields of radiation coefficients
100 integer_m :: nulout
101 integer_m :: nulnam
102 integer_m :: ncmafl(26)
103 integer_m :: npossh
104 integer_m :: nposgg
105 integer_m :: nsphmo
106 integer_m :: nhoumo
107 integer_m :: npinmi
108 integer_m :: nfreq2
109 integer_m :: nltype
110 integer_m :: ntide
111 integer_m :: ntrjsh
112 integer_m :: ntrjgg
113 integer_m :: ninmsh
114 integer_m :: ninmgg
115 integer_m :: ninish
116 integer_m :: ninigg
117 integer_m :: nfgish
118 integer_m :: nfgigg
119 integer_m :: npppsh
120 integer_m :: nppgg
121 integer_m :: nultmp
122 integer_m :: nfcer0
123 integer_m :: nfcerz
124 integer_m :: nfcerh
125 integer_m :: nfcevc
126 integer_m :: nfcspg
127 integer_m :: npoddh
128 integer_m :: nulleg
129 integer_m :: norzun
130 integer_m :: nsavsp
131 integer_m :: nffunc
132 integer_m :: nfspnc
133 integer_m :: nfdit0
134 integer_m :: nfspt0
135 integer_m :: nulzdid
136 integer_m :: nulzdif
137 integer_m :: nulcl1
138 integer_m :: nulcl2
139 integer_m :: nulase
140 integer_m :: nulass
141 integer_m :: nuldila
142 integer_m :: nulcont
143 integer_m :: nulrots
144 integer_m :: nulrotc
145 integer_m :: nulrcf
146 integer_m :: nulhwf
147 integer_m :: nulusr1
148 integer_m :: nulusr2
149 integer_m :: nulusr3
150 integer_m :: nulusr4
151 integer_m :: nulusr5
152 integer_m :: nulco
153 integer_m :: nefls
154 integer_m :: neflss
155 integer_m :: nbias
156 integer_m :: npdirl
157 integer_m :: nuldisp
158 integer_m :: nulstat
159 integer_m :: nulfp01
160 integer_m :: nulfp02
161 integer_m :: nulfp03
162 integer_m :: nulfp04
163 integer_m :: nulfp05
164 integer_m :: nulfp06
165 integer_m :: nulfp07
166 integer_m :: nulfp08
167 integer_m :: nulfp09
168 integer_m :: nulfp10
169 integer_m :: nulfp11
170 integer_m :: nulfp12
171 integer_m :: nulfp13
172 integer_m :: nulfp14
173 integer_m :: nulfp15
174 integer_m :: nulfpos
175 integer_m :: nscrtch
176 integer_m :: nuldia
177 integer_m :: nulerr
178 integer_m :: nulref
179 integer_m :: nultim
180 integer_m :: nulrad
181 integer_m :: nuo3ch1
182 integer_m :: nuo3ch2
183 integer_m :: ntcsr
184 ! ------------------------------------------------------------------
185 END MODULE yomlun
integer(kind=jpim), dimension(10) ncmafl
Definition: yomlun.F90:77
integer(kind=jpim) nulusr1
Definition: yomlun.F90:98
integer(kind=jpim) npoddh
Definition: yomlun.F90:88
integer(kind=jpim) ninish
Definition: yomlun.F90:82
integer(kind=jpim) nulfp05
Definition: yomlun.F90:113
integer(kind=jpim) npdirl
Definition: yomlun.F90:107
integer(kind=jpim) nulfp09
Definition: yomlun.F90:117
integer(kind=jpim) nulfp04
Definition: yomlun.F90:112
integer(kind=jpim) nulref
Definition: yomlun.F90:127
integer(kind=jpim) neflss
Definition: yomlun.F90:105
integer(kind=jpim) npossh
Definition: yomlun.F90:78
integer(kind=jpim) nulusr4
Definition: yomlun.F90:101
integer(kind=jpim) nulfp02
Definition: yomlun.F90:110
integer(kind=jpim) nulfp07
Definition: yomlun.F90:115
integer(kind=jpim) nscrtch
Definition: yomlun.F90:125
integer(kind=jpim) nultmp
Definition: yomlun.F90:87
integer(kind=jpim) nulhwf
Definition: yomlun.F90:97
integer(kind=jpim) nulfp10
Definition: yomlun.F90:118
integer(kind=jpim) nulfp11
Definition: yomlun.F90:119
integer(kind=jpim) nulase
Definition: yomlun.F90:91
integer(kind=jpim) nulusr2
Definition: yomlun.F90:99
integer(kind=jpim) nfgish
Definition: yomlun.F90:84
integer(kind=jpim) nulco
Definition: yomlun.F90:103
integer(kind=jpim) nefls
Definition: yomlun.F90:104
integer(kind=jpim) nfgigg
Definition: yomlun.F90:85
integer(kind=jpim) ninmsh
Definition: yomlun.F90:81
integer(kind=jpim) nulfp14
Definition: yomlun.F90:122
integer(kind=jpim) nulfp12
Definition: yomlun.F90:120
integer(kind=jpim) nulass
Definition: yomlun.F90:92
integer(kind=jpim) nulcl2
Definition: yomlun.F90:90
integer(kind=jpim) nbias
Definition: yomlun.F90:106
integer(kind=jpim) ntide
Definition: yomlun.F90:79
integer(kind=jpim) nulfp13
Definition: yomlun.F90:121
integer(kind=jpim) ntrjsh
Definition: yomlun.F90:80
Definition: yomlun.F90:1
integer(kind=jpim) npppsh
Definition: yomlun.F90:86
integer(kind=jpim) nuo3ch2
Definition: yomlun.F90:131
integer(kind=jpim) nulfp03
Definition: yomlun.F90:111
integer(kind=jpim) nulfp01
Definition: yomlun.F90:109
integer(kind=jpim) nulcont
Definition: yomlun.F90:94
integer(kind=jpim) nulusr5
Definition: yomlun.F90:102
integer(kind=jpim) ninigg
Definition: yomlun.F90:83
integer(kind=jpim) nulcl1
Definition: yomlun.F90:89
integer(kind=jpim) nulusr3
Definition: yomlun.F90:100
integer(kind=jpim) nuo3ch1
Definition: yomlun.F90:130
integer(kind=jpim) nulstat
Definition: yomlun.F90:108
integer(kind=jpim) nulrotc
Definition: yomlun.F90:95
integer(kind=jpim) nulfp08
Definition: yomlun.F90:116
integer(kind=jpim) ntcsr
Definition: yomlun.F90:132
integer(kind=jpim) nulrcf
Definition: yomlun.F90:96
integer(kind=jpim) nulrad
Definition: yomlun.F90:128
integer(kind=jpim) nuldila
Definition: yomlun.F90:93
integer(kind=jpim) nulfpos
Definition: yomlun.F90:124
integer(kind=jpim) nulfp06
Definition: yomlun.F90:114
integer(kind=jpim) nulfp15
Definition: yomlun.F90:123