/[lmdze]/trunk/src_ce0l
ViewVC logotype

Contents of /trunk/src_ce0l

Parent Directory Parent Directory | Revision Log Revision Log


Revision 144 - (show annotations)
Wed Jun 10 16:46:46 2015 UTC (8 years, 10 months ago) by guez
File size: 1061 byte(s)
In procedure fxhyp, the convoluted computation of tanh(fa/fb) occurred
three times. Extracted it into a function. Also, the computation of
xmoy and fxm was repeated. So stored the values in arrays instead.

In procedure fxhyp, in the computation of fhyp, there were tests
xtild(i) == 0. and xtild(i) == pi_d. No use to do these tests at each
iteration. We now they are true for i == nmax and i == 2 * nmax,
respectively, and we know they are false for other values of
"i". Similarly, in the computations of ffdx and xxpr, there were the
tests xmoy == 0. and xmoy == pi_d, these could not be true.

Moved files from bibio to dyn3d, following LMDZ.

1 abort_gcm.f
2 acc.f
3 bernoui.f
4 caldyn0.f
5 calendar.f
6 ce0l.f
7 clesphys.f
8 coefpoly.f
9 comconst.f
10 comdissnew.f
11 comgeom.f
12 conf_dat2d.f
13 conf_dat3d.f
14 conf_gcm.f
15 convflu.f
16 convmas.f
17 covcont.f
18 dimens_m.f
19 dimphy.f
20 dimsoil.f
21 disvert.f
22 dynetat0.f
23 dynredem0.f
24 dynredem1.f
25 enercin.f
26 ener.f
27 errioipsl.f
28 etat0.f
29 exner_hyb.f
30 extrapol.f
31 filtreg_hemisph.f
32 filtreg_scal.f
33 filtreg_v.f
34 flumass.f
35 fxhyp.f
36 fyhyp.f
37 geopot.f
38 grid_atob.f
39 grid_change.f
40 grid_noro_m.f
41 grilles_gcm_netcdf_sub.f
42 gr_int_dyn_m.f
43 heavyside.f
44 histbeg_totreg.f
45 histclo.f
46 histcom_var.f
47 histhori_regular.f
48 indicesol.f
49 iniadvtrac.f
50 inifgn.f
51 inifilr.f
52 inter_barx.f
53 inter_barxy.f
54 inter_bary.f
55 invert_zoom_x.f
56 ioconf_calendar.f
57 ioipslmpp.f
58 ju2ymds.f
59 limit.f
60 massbar.f
61 massbarxy.f
62 massdair.f
63 minmax.f
64 mva9.f
65 ord_coord.f
66 ord_coordm.f
67 paramet_m.f
68 phyetat0.f
69 phyredem.f
70 principal_cshift.f
71 q_sat.f
72 regr_lat_time_coefoz.f
73 regr_pr_o3.f
74 read_serre.f
75 sortvarc.f
76 ssum.f
77 startdyn.f
78 start_init_orog_m.f
79 start_init_phys_m.f
80 start_inter_3d.f
81 strlowercase.f
82 tanh_cautious.f
83 temps.f
84 test_disvert.f
85 tourpot.f
86 unit_nml_m.f
87 vitvert.f
88 ymds2ju.f

  ViewVC Help
Powered by ViewVC 1.1.21