/[lmdze]/trunk/Compilation/src_gcm_only
ViewVC logotype

Contents of /trunk/Compilation/src_gcm_only

Parent Directory Parent Directory | Revision Log Revision Log


Revision 115 - (show annotations)
Fri Sep 19 17:36:20 2014 UTC (9 years, 8 months ago) by guez
File size: 2981 byte(s)
Extracted code from tau2alpha for first call into new procedure
init_tau2alpha. dxdys, dxdyu, dxdyv are now local variables if guide
computed by init_tau2alpha. This allows us to remove terrible argument
type of tau2alpha: we just give to tau2alpha the right dxdy and
rlat.

In module conf_guide_m, changed default values of tau_min_*, because
0.02 is too small for the default daystep = 240, iperiod = 5. Changed
default values of guide_[uv] to false. Moved variable ok_guide from
conf_gcm_m to conf_guide_m, ok_guide is no longer an input parameter,
it is computed from guide_*. Had then to move test on ok_guide and
day_step from conf_gcm_m to conf_guide_m. Added checks on input
nudging parameters in procedure conf_guide. Upgraded variable factt to
module conf_guide_m in order to check nudging parameters. Bug fix:
variable guide_q was not in namelist conf_guide_nml.

Removed unused variables aire_min, aire_max of MODULE guide_m.

Moved the call to conf_guide from guide to gcm. This was needed to
define ok_guide before getting into guide (since ok_guide is no longer
in conf_gcm_m). Moved test on grossismx and grossismy from tau2alpha
to guide. It is clearer now that only tau_max is used for a regular
grid, and we do not have to repeat this test in each call to
tau2alpha. In guide, we only call writefield when alpha is not a
constant.

1 aaam_bud.f
2 academic.f
3 adaptdt.f
4 addfi.f
5 advect.f
6 advn.f
7 advtrac.f
8 advx.f
9 advxp.f
10 advy.f
11 advyp.f
12 advz.f
13 advzp.f
14 aeropt.f
15 ajsec.f
16 albedo.f
17 albsno.f
18 bilan_dyn.f
19 buildop.f
20 caladvtrac.f
21 calbeta.f
22 calcul_fluxs.f
23 caldyn.f
24 calfis.f
25 calltherm.f
26 chem.f
27 clcdrag.f
28 cleanstr.f
29 clesphys2.f
30 clmain.f
31 clouds_gno.f
32 clqh.f
33 cltrac.f
34 cltracrn.f
35 clvent.f
36 coefcdrag.f
37 coefkz2.f
38 coefkz.f
39 coefkzmin.f
40 comfisrtilp.f
41 comgeomphy.f
42 com_io_dyn.f
43 concvl.f
44 conema3_m.f
45 conf_guide.f
46 conflx.f
47 conf_phys.f
48 coordij.f
49 correctbid.f
50 covnat.f
51 createnewfield.f
52 ctherm.f
53 cv3_closure.f
54 cv3_compress.f
55 cv3_feed.f
56 cv3_mixing.f
57 cv3_param.f
58 cv3_prelim.f
59 cv3_tracer.f
60 cv3_trigger.f
61 cv3_uncompress.f
62 cv3_undilute1.f
63 cv3_undilute2.f
64 cv3_unsat.f
65 cv3_yield.f
66 cv_closure.f
67 cv_compress.f
68 cv_driver.f
69 cv_feed.f
70 cv_flag.f
71 cvflag.f
72 cvltr.f
73 cv_mixing.f
74 cv_param.f
75 cv_prelim.f
76 cv_thermo.f
77 cvthermo.f
78 cv_trigger.f
79 cv_uncompress.f
80 cv_undilute1.f
81 cv_undilute2.f
82 cv_unsat.f
83 cv_yield.f
84 decoop.f
85 diagcld1.f
86 diagcld2.f
87 diagetpq.f
88 diagphy.f
89 dissip.f
90 divergf.f
91 diverg_gam.f
92 divgrad2.f
93 dqthermcell2.f
94 dqthermcell.f
95 drag_noro.f
96 dteta1.f
97 dudv1.f
98 dudv2.f
99 dvthermcell2.f
100 dynetat0.f
101 FCTTRE.f
102 findsep.f
103 find_str.f
104 fisrtilp.f
105 fluxstokenc.f
106 flxadjtq.f
107 flxasc.f
108 flxbase.f
109 flxddraf.f
110 flxdlfs.f
111 flxdtdq.f
112 flxflux.f
113 flxini.f
114 flxmain.f
115 fonte_neige.f
116 gcm.f
117 getfieldindex.f
118 getso4fromfile.f
119 grad.f
120 gradiv2.f
121 gradsdef.f
122 gr_fi_ecrit.f
123 groupe.f
124 groupeun.f
125 gr_phy_write_3d.f
126 gr_u_scal.f
127 gr_v_scal.f
128 guide.f
129 gwprofil.f
130 gwstress.f
131 hbtm.f
132 hgardfou.f
133 histbeg_totreg.f
134 histdef.f
135 histend.f
136 histhori_regular.f
137 histsync.f
138 histvar_seq.f
139 histvert.f
140 histwrite.f
141 histwrite_real.f
142 inidissip.f
143 ini_histins.f
144 ini_histrac.f
145 initdynav.f
146 init_dynzon.f
147 init_tau2alpha.f
148 initfluxsto.f
149 inithist.f
150 initial0.f
151 initphysto.f
152 initrrnpb.f
153 integrd.f
154 interface_surf.f
155 interfoce_lim.f
156 interfsurf_hq.f
157 interfsur_lim.f
158 interpost.f
159 interpre.f
160 ioget_calendar.f
161 ioipslmpp.f
162 isittime.f
163 ismax.f
164 ismin.f
165 itau2date.f
166 laplacien.f
167 laplacien_gam.f
168 laplacien_rot.f
169 laplacien_rotgam.f
170 leapfrog.f
171 lift_noro.f
172 limx.f
173 limy.f
174 limz.f
175 lwb.f
176 lwbv.f
177 lwc.f
178 lw.f
179 lwtt.f
180 lwttm.f
181 lwu.f
182 lwvb.f
183 lwvd.f
184 lwv.f
185 lwvn.f
186 mathelp.f
187 mathop2.f
188 mathop.f
189 minmaxqfi.f
190 moycum.f
191 nat2gcm.f
192 newmicro.f
193 nflxtr.f
194 nuage.f
195 nxgrad.f
196 nxgrad_gam.f
197 nxgraro2.f
198 o3_chem.f
199 orbite.f
200 orodrag.f
201 orolift.f
202 orosetup.f
203 ozonecm.f
204 pentes_ini.f
205 phyetat0.f
206 physiq.f
207 phystokenc.f
208 phytrac.f
209 ppm3d.f
210 prather.f
211 pres2lev.f
212 press_coefoz.f
213 pressure_var.f
214 printflag.f
215 qcheck.f
216 qminimum.f
217 raddim.f
218 raddimlw.f
219 radepsi.f
220 radiornpb.f
221 radlwsw.f
222 radopt.f
223 read_reanalyse.f
224 readsulfate.f
225 readsulfate_preind.f
226 reanalyse2nat.f
227 regr_pr_av.f
228 regr_pr_comb_coefoz.f
229 regr_pr_int.f
230 rotatf.f
231 rotat_nfil.f
232 scopy.f
233 screenc.f
234 screenp.f
235 soil.f
236 stdlevvar.f
237 sugwd.f
238 suphec.f
239 sw1s.f
240 sw2s.f
241 swclr.f
242 swde.f
243 sw.f
244 swr.f
245 swtt1.f
246 swtt.f
247 swu.f
248 tau2alpha.f
249 thermcell.f
250 tracstoke.f
251 trans_buff.f
252 transp.f
253 transp_lay.f
254 ustarhb.f
255 vdif_kcay.f
256 vlsplt.f
257 vlspltqs.f
258 vlx.f
259 vlxqs.f
260 vly.f
261 vlyqs.f
262 vlz.f
263 writedynav.f
264 writefield.f
265 writehist.f
266 yamada4.f
267 yamada.f
268 YOECUMF.f
269 YOEGWD.f
270 yoethf.f
271 YOMCST.f
272 zenang.f
273 zilch.f

  ViewVC Help
Powered by ViewVC 1.1.21