Parent Directory | Revision Log
Created module cv_thermo_m around procedure cv_thermo. Moved variables from module cvthermo to module cv_thermo_m, where they are defined. In ini_histins and initphysto, using part of rlon and rlat from phyetat0_m is pretending that we do not know about the dynamical grid, while the way we extract zx_lon(:, 1) and zx_lat(1, :) depends on ordering inside rlon and rlat. So we might as well simplify and clarify by using directly rlonv and rlatu. Removed intermediary variables in write_histins and phystokenc.
1 | guez | 123 | aaam_bud.f |
2 | abort_gcm.f | ||
3 | academic.f | ||
4 | adaptdt.f | ||
5 | addfi.f | ||
6 | advect.f | ||
7 | advn.f | ||
8 | advtrac.f | ||
9 | aeropt.f | ||
10 | ajsec.f | ||
11 | alboc_cd.f | ||
12 | alboc.f | ||
13 | albsno.f | ||
14 | bernoui.f | ||
15 | bilan_dyn.f | ||
16 | buildop.f | ||
17 | caladvtrac.f | ||
18 | calbeta.f | ||
19 | calcul_fluxs.f | ||
20 | caldyn.f | ||
21 | calendar.f | ||
22 | calfis.f | ||
23 | calltherm.f | ||
24 | chem.f | ||
25 | clcdrag.f | ||
26 | cleanstr.f | ||
27 | clesphys2.f | ||
28 | clesphys.f | ||
29 | clmain.f | ||
30 | clouds_gno.f | ||
31 | clqh.f | ||
32 | cltrac.f | ||
33 | cltracrn.f | ||
34 | clvent.f | ||
35 | coefcdrag.f | ||
36 | coefkz2.f | ||
37 | coefkz.f | ||
38 | coefkzmin.f | ||
39 | coefpoly.f | ||
40 | comconst.f | ||
41 | comdissnew.f | ||
42 | comfisrtilp.f | ||
43 | comgeom.f | ||
44 | comgeomphy.f | ||
45 | com_io_dyn.f | ||
46 | concvl.f | ||
47 | conema3_m.f | ||
48 | conf_gcm.f | ||
49 | conf_guide.f | ||
50 | conflx.f | ||
51 | conf_phys.f | ||
52 | convflu.f | ||
53 | convmas.f | ||
54 | coordij.f | ||
55 | covcont.f | ||
56 | covnat.f | ||
57 | createnewfield.f | ||
58 | ctherm.f | ||
59 | guez | 185 | cv30_closure.f |
60 | cv30_compress.f | ||
61 | cv30_feed.f | ||
62 | cv30_mixing.f | ||
63 | cv30_param.f | ||
64 | cv30_prelim.f | ||
65 | cv30_tracer.f | ||
66 | cv30_trigger.f | ||
67 | cv30_uncompress.f | ||
68 | cv30_undilute1.f | ||
69 | cv30_undilute2.f | ||
70 | cv30_unsat.f | ||
71 | cv30_yield.f | ||
72 | guez | 123 | cv_driver.f |
73 | cvltr.f | ||
74 | cv_thermo.f | ||
75 | decoop.f | ||
76 | diagcld1.f | ||
77 | diagcld2.f | ||
78 | diagetpq.f | ||
79 | diagphy.f | ||
80 | dimens_m.f | ||
81 | dimphy.f | ||
82 | dimsoil.f | ||
83 | dissip.f | ||
84 | disvert.f | ||
85 | divergf.f | ||
86 | diverg_gam.f | ||
87 | divgrad2.f | ||
88 | dqthermcell2.f | ||
89 | dqthermcell.f | ||
90 | drag_noro.f | ||
91 | dteta1.f | ||
92 | dudv1.f | ||
93 | dudv2.f | ||
94 | dvthermcell2.f | ||
95 | dynetat0.f | ||
96 | dynredem0.f | ||
97 | dynredem1.f | ||
98 | enercin.f | ||
99 | ener.f | ||
100 | errioipsl.f | ||
101 | exner_hyb.f | ||
102 | FCTTRE.f | ||
103 | guez | 136 | filtreg_hemisph.f |
104 | guez | 137 | filtreg_scal.f |
105 | filtreg_v.f | ||
106 | guez | 123 | findsep.f |
107 | find_str.f | ||
108 | fisrtilp.f | ||
109 | flumass.f | ||
110 | fluxstokenc.f | ||
111 | flxadjtq.f | ||
112 | flxasc.f | ||
113 | flxbase.f | ||
114 | flxddraf.f | ||
115 | flxdlfs.f | ||
116 | flxdtdq.f | ||
117 | flxflux.f | ||
118 | flxini.f | ||
119 | flxmain.f | ||
120 | fonte_neige.f | ||
121 | gcm.f | ||
122 | geopot.f | ||
123 | getfieldindex.f | ||
124 | getso4fromfile.f | ||
125 | grad.f | ||
126 | gradiv2.f | ||
127 | gradsdef.f | ||
128 | grid_change.f | ||
129 | groupe.f | ||
130 | groupeun.f | ||
131 | guez | 189 | gr_phy_write.f |
132 | guez | 123 | gr_u_scal.f |
133 | gr_v_scal.f | ||
134 | guide.f | ||
135 | gwprofil.f | ||
136 | gwstress.f | ||
137 | hbtm.f | ||
138 | heavyside.f | ||
139 | hgardfou.f | ||
140 | histbeg_totreg.f | ||
141 | histclo.f | ||
142 | histcom_var.f | ||
143 | histdef.f | ||
144 | histend.f | ||
145 | histhori_regular.f | ||
146 | histsync.f | ||
147 | histvar_seq.f | ||
148 | histvert.f | ||
149 | histwrite.f | ||
150 | histwrite_real.f | ||
151 | indicesol.f | ||
152 | iniadvtrac.f | ||
153 | inidissip.f | ||
154 | inifgn.f | ||
155 | inifilr.f | ||
156 | guez | 166 | inifilr_hemisph.f |
157 | guez | 123 | ini_histins.f |
158 | initdynav.f | ||
159 | init_dynzon.f | ||
160 | initfluxsto.f | ||
161 | inithist.f | ||
162 | initial0.f | ||
163 | initphysto.f | ||
164 | initrrnpb.f | ||
165 | init_tau2alpha.f | ||
166 | integrd.f | ||
167 | interface_surf.f | ||
168 | interfoce_lim.f | ||
169 | interfsurf_hq.f | ||
170 | interfsur_lim.f | ||
171 | guez | 131 | invert_zoom_x.f |
172 | guez | 123 | ioconf_calendar.f |
173 | ioget_calendar.f | ||
174 | isittime.f | ||
175 | ismax.f | ||
176 | ismin.f | ||
177 | itau2date.f | ||
178 | ju2ymds.f | ||
179 | laplacien.f | ||
180 | laplacien_gam.f | ||
181 | laplacien_rot.f | ||
182 | laplacien_rotgam.f | ||
183 | leapfrog.f | ||
184 | lift_noro.f | ||
185 | lwb.f | ||
186 | lwbv.f | ||
187 | lwc.f | ||
188 | lw.f | ||
189 | lwtt.f | ||
190 | lwttm.f | ||
191 | lwu.f | ||
192 | lwvb.f | ||
193 | lwvd.f | ||
194 | lwv.f | ||
195 | lwvn.f | ||
196 | massbar.f | ||
197 | massbarxy.f | ||
198 | massdair.f | ||
199 | mathelp.f | ||
200 | mathop2.f | ||
201 | mathop.f | ||
202 | minmax.f | ||
203 | minmaxqfi.f | ||
204 | moycum.f | ||
205 | nat2gcm.f | ||
206 | newmicro.f | ||
207 | nflxtr.f | ||
208 | nuage.f | ||
209 | nxgrad.f | ||
210 | nxgrad_gam.f | ||
211 | nxgraro2.f | ||
212 | o3_chem.f | ||
213 | orbite.f | ||
214 | orodrag.f | ||
215 | orolift.f | ||
216 | orosetup.f | ||
217 | ozonecm.f | ||
218 | paramet_m.f | ||
219 | phyetat0.f | ||
220 | guez | 166 | phyredem0.f |
221 | guez | 123 | phyredem.f |
222 | physiq.f | ||
223 | phystokenc.f | ||
224 | phytrac.f | ||
225 | pres2lev.f | ||
226 | press_coefoz.f | ||
227 | guez | 124 | principal_cshift.f |
228 | guez | 123 | printflag.f |
229 | qcheck.f | ||
230 | qminimum.f | ||
231 | q_sat.f | ||
232 | raddim.f | ||
233 | raddimlw.f | ||
234 | radepsi.f | ||
235 | radiornpb.f | ||
236 | radlwsw.f | ||
237 | radopt.f | ||
238 | read_reanalyse.f | ||
239 | readsulfate.f | ||
240 | readsulfate_preind.f | ||
241 | reanalyse2nat.f | ||
242 | regr_pr_av.f | ||
243 | regr_pr_comb_coefoz.f | ||
244 | regr_pr_int.f | ||
245 | rotatf.f | ||
246 | rotat_nfil.f | ||
247 | scopy.f | ||
248 | screenc.f | ||
249 | screenp.f | ||
250 | soil.f | ||
251 | sortvarc.f | ||
252 | ssum.f | ||
253 | stdlevvar.f | ||
254 | strlowercase.f | ||
255 | suphec.f | ||
256 | sw1s.f | ||
257 | sw2s.f | ||
258 | swclr.f | ||
259 | swde.f | ||
260 | sw.f | ||
261 | swr.f | ||
262 | swtt1.f | ||
263 | swtt.f | ||
264 | swu.f | ||
265 | tau2alpha.f | ||
266 | temps.f | ||
267 | thermcell.f | ||
268 | tourpot.f | ||
269 | tracstoke.f | ||
270 | trans_buff.f | ||
271 | transp.f | ||
272 | transp_lay.f | ||
273 | unit_nml_m.f | ||
274 | ustarhb.f | ||
275 | vdif_kcay.f | ||
276 | vitvert.f | ||
277 | vlsplt.f | ||
278 | vlspltqs.f | ||
279 | vlx.f | ||
280 | vlxqs.f | ||
281 | vly.f | ||
282 | vlyqs.f | ||
283 | vlz.f | ||
284 | writedynav.f | ||
285 | writefield.f | ||
286 | writehist.f | ||
287 | yamada4.f | ||
288 | yamada.f | ||
289 | ymds2ju.f | ||
290 | YOECUMF.f | ||
291 | YOEGWD.f | ||
292 | yoethf.f | ||
293 | YOMCST.f | ||
294 | zenang.f |
ViewVC Help | |
Powered by ViewVC 1.1.21 |