Parent Directory | Revision Log
Converted to free source form files which were still in fixed source form. The conversion was done using the polish mode of the NAG Fortran Compiler. In addition to converting to free source form, the processing of the files also: -- indented the code (including comments); -- set Fortran keywords to uppercase, and set all other identifiers to lower case; -- added qualifiers to end statements (for example "end subroutine conflx", instead of "end"); -- changed the terminating statements of all DO loops so that each loop ends with an ENDDO statement (instead of a labeled continue).
1 | guez | 70 | aaam_bud.f90 |
2 | academic.f90 | ||
3 | guez | 81 | adaptdt.f90 |
4 | guez | 70 | addfi.f90 |
5 | advect.f90 | ||
6 | guez | 81 | advn.f90 |
7 | guez | 70 | advtrac.f90 |
8 | guez | 81 | advx.f90 |
9 | advxp.f90 | ||
10 | advy.f90 | ||
11 | advyp.f90 | ||
12 | advz.f90 | ||
13 | advzp.f90 | ||
14 | guez | 70 | aeropt.f90 |
15 | ajsec.f90 | ||
16 | guez | 81 | albedo.f90 |
17 | guez | 70 | albsno.f90 |
18 | bilan_dyn.f90 | ||
19 | caladvtrac.f90 | ||
20 | guez | 81 | calbeta.f90 |
21 | guez | 70 | calcul_fluxs.f90 |
22 | caldyn.f90 | ||
23 | calfis.f90 | ||
24 | calltherm.f90 | ||
25 | chem.f90 | ||
26 | clcdrag.f90 | ||
27 | clesphys2.f90 | ||
28 | guez | 81 | clift.f90 |
29 | guez | 70 | clmain.f90 |
30 | guez | 72 | clouds_gno.f90 |
31 | guez | 70 | clqh.f90 |
32 | guez | 81 | cltrac.f90 |
33 | guez | 70 | cltracrn.f90 |
34 | clvent.f90 | ||
35 | cmpblank.f90 | ||
36 | coefcdrag.f90 | ||
37 | coefkz2.f90 | ||
38 | coefkz.f90 | ||
39 | coefkzmin.f90 | ||
40 | comfisrtilp.f90 | ||
41 | comgeomphy.f90 | ||
42 | com_io_dyn.f90 | ||
43 | concvl.f90 | ||
44 | guez | 81 | condsurf.f90 |
45 | guez | 70 | conema3.f90 |
46 | conema3_m.f90 | ||
47 | conf_guide.f90 | ||
48 | conflx.f90 | ||
49 | conf_phys.f90 | ||
50 | guez | 81 | convect3.f90 |
51 | coordij.f90 | ||
52 | guez | 70 | correctbid.f90 |
53 | covnat.f90 | ||
54 | ctherm.f90 | ||
55 | cv3_closure.f90 | ||
56 | cv3_compress.f90 | ||
57 | cv3_feed.f90 | ||
58 | cv3_mixing.f90 | ||
59 | cv3_param.f90 | ||
60 | cv3_prelim.f90 | ||
61 | cv3_tracer.f90 | ||
62 | cv3_trigger.f90 | ||
63 | cv3_uncompress.f90 | ||
64 | cv3_undilute1.f90 | ||
65 | cv3_undilute2.f90 | ||
66 | cv3_unsat.f90 | ||
67 | cv3_yield.f90 | ||
68 | cv_closure.f90 | ||
69 | cv_compress.f90 | ||
70 | cv_driver.f90 | ||
71 | cv_feed.f90 | ||
72 | cv_flag.f90 | ||
73 | cvflag.f90 | ||
74 | cvltr.f90 | ||
75 | cv_mixing.f90 | ||
76 | cv_param.f90 | ||
77 | cvparam.f90 | ||
78 | cv_prelim.f90 | ||
79 | cv_thermo.f90 | ||
80 | cvthermo.f90 | ||
81 | cv_trigger.f90 | ||
82 | cv_uncompress.f90 | ||
83 | cv_undilute1.f90 | ||
84 | cv_undilute2.f90 | ||
85 | cv_unsat.f90 | ||
86 | cv_yield.f90 | ||
87 | diagcld1.f90 | ||
88 | diagcld2.f90 | ||
89 | diagetpq.f90 | ||
90 | diagphy.f90 | ||
91 | dissip.f90 | ||
92 | guez | 81 | diverg.f90 |
93 | guez | 78 | divergf.f90 |
94 | guez | 81 | diverg_gam.f90 |
95 | guez | 78 | divgrad2.f90 |
96 | guez | 70 | dqthermcell2.f90 |
97 | dqthermcell.f90 | ||
98 | drag_noro.f90 | ||
99 | dteta1.f90 | ||
100 | guez | 81 | dudv1.f90 |
101 | dudv2.f90 | ||
102 | dump2d.f90 | ||
103 | guez | 70 | dvthermcell2.f90 |
104 | dynetat0.f90 | ||
105 | FCTTRE.f90 | ||
106 | find_sig.f90 | ||
107 | guez | 78 | find_str.f90 |
108 | guez | 70 | fisrtilp.f90 |
109 | fluxstokenc.f90 | ||
110 | flxadjtq.f90 | ||
111 | flxasc.f90 | ||
112 | flxbase.f90 | ||
113 | flxddraf.f90 | ||
114 | flxdlfs.f90 | ||
115 | flxdtdq.f90 | ||
116 | flxflux.f90 | ||
117 | flxini.f90 | ||
118 | flxmain.f90 | ||
119 | fonte_neige.f90 | ||
120 | guez | 81 | formcoord.f90 |
121 | guez | 70 | gath_cpl.f90 |
122 | guez | 79 | gcm.f90 |
123 | guez | 70 | gensig.f90 |
124 | getincom2.f90 | ||
125 | getincom.f90 | ||
126 | getparam.f90 | ||
127 | guez | 78 | getso4fromfile.f90 |
128 | grad.f90 | ||
129 | gradiv2.f90 | ||
130 | guez | 70 | gradsdef.f90 |
131 | gr_fi_ecrit.f90 | ||
132 | groupe.f90 | ||
133 | guez | 81 | groupeun.f90 |
134 | guez | 70 | gr_phy_write_3d.f90 |
135 | guez | 81 | gr_u_scal.f90 |
136 | gr_v_scal.f90 | ||
137 | guez | 70 | guide.f90 |
138 | gwprofil.f90 | ||
139 | gwstress.f90 | ||
140 | hbtm.f90 | ||
141 | hgardfou.f90 | ||
142 | guez | 78 | histbeg_totreg.f90 |
143 | histdef.f90 | ||
144 | histend.f90 | ||
145 | histhori_regular.f90 | ||
146 | histsync.f90 | ||
147 | guez | 70 | histvar_seq.f90 |
148 | guez | 78 | histvert.f90 |
149 | guez | 70 | histwrite.f90 |
150 | histwrite_real.f90 | ||
151 | guez | 78 | inidissip.f90 |
152 | guez | 70 | inigrads.f90 |
153 | ini_histday.f90 | ||
154 | ini_histhf3d.f90 | ||
155 | ini_histhf.f90 | ||
156 | ini_histins.f90 | ||
157 | ini_histrac.f90 | ||
158 | initdynav.f90 | ||
159 | init_dynzon.f90 | ||
160 | initfluxsto.f90 | ||
161 | inithist.f90 | ||
162 | guez | 81 | initial0.f90 |
163 | guez | 70 | initphysto.f90 |
164 | guez | 81 | initrrnpb.f90 |
165 | guez | 70 | integrd.f90 |
166 | interface_surf.f90 | ||
167 | interfoce_lim.f90 | ||
168 | interfoce_slab.f90 | ||
169 | interfsurf_hq.f90 | ||
170 | interfsur_lim.f90 | ||
171 | guez | 81 | interpost.f90 |
172 | interpre.f90 | ||
173 | guez | 78 | ioget_calendar.f90 |
174 | ioipslmpp.f90 | ||
175 | guez | 81 | ismax.f90 |
176 | ismin.f90 | ||
177 | guez | 78 | laplacien.f90 |
178 | guez | 81 | laplacien_gam.f90 |
179 | laplacien_rot.f90 | ||
180 | laplacien_rotgam.f90 | ||
181 | guez | 70 | leapfrog.f90 |
182 | lift_noro.f90 | ||
183 | guez | 81 | limx.f90 |
184 | limy.f90 | ||
185 | limz.f90 | ||
186 | lnblnk.f90 | ||
187 | guez | 72 | lwb.f90 |
188 | guez | 81 | lwbv.f90 |
189 | lwc.f90 | ||
190 | guez | 71 | lw.f90 |
191 | guez | 81 | lwtt.f90 |
192 | lwttm.f90 | ||
193 | guez | 71 | lwu.f90 |
194 | guez | 81 | lwvb.f90 |
195 | lwvd.f90 | ||
196 | lwv.f90 | ||
197 | lwvn.f90 | ||
198 | guez | 78 | mathelp.f90 |
199 | mathop2.f90 | ||
200 | guez | 70 | mathop.f90 |
201 | minmaxqfi.f90 | ||
202 | nat2gcm.f90 | ||
203 | newmicro.f90 | ||
204 | nflxtr.f90 | ||
205 | nocomma.f90 | ||
206 | nuage.f90 | ||
207 | guez | 81 | nxgrad.f90 |
208 | nxgrad_gam.f90 | ||
209 | guez | 78 | nxgraro2.f90 |
210 | guez | 70 | o3_chem.f90 |
211 | oasis_m.f90 | ||
212 | orbite.f90 | ||
213 | orodrag.f90 | ||
214 | orolift.f90 | ||
215 | orosetup.f90 | ||
216 | ozonecm.f90 | ||
217 | guez | 81 | pentes_ini.f90 |
218 | guez | 70 | phyetat0.f90 |
219 | physiq.f90 | ||
220 | phystokenc.f90 | ||
221 | phytrac.f90 | ||
222 | guez | 81 | ppm3d.f90 |
223 | prather.f90 | ||
224 | pres2lev.f90 | ||
225 | guez | 70 | press_coefoz.f90 |
226 | printflag.f90 | ||
227 | guez | 81 | PVtheta.f90 |
228 | guez | 70 | qcheck.f90 |
229 | qminimum.f90 | ||
230 | raddim.f90 | ||
231 | raddimlw.f90 | ||
232 | radepsi.f90 | ||
233 | radiornpb.f90 | ||
234 | radlwsw.f90 | ||
235 | radopt.f90 | ||
236 | read_reanalyse.f90 | ||
237 | readsulfate.f90 | ||
238 | readsulfate_preind.f90 | ||
239 | reanalyse2nat.f90 | ||
240 | regr_pr_coefoz.f90 | ||
241 | regr_pr_comb_coefoz.f90 | ||
242 | guez | 81 | rotat.f90 |
243 | rotatf.f90 | ||
244 | rotat_nfil.f90 | ||
245 | guez | 79 | scopy.f90 |
246 | guez | 70 | screenc.f90 |
247 | screenp.f90 | ||
248 | guez | 81 | soil.f90 |
249 | guez | 70 | sortvarc.f90 |
250 | stdlevvar.f90 | ||
251 | sugwd.f90 | ||
252 | suphec.f90 | ||
253 | guez | 81 | sw1s.f90 |
254 | sw2s.f90 | ||
255 | swclr.f90 | ||
256 | swde.f90 | ||
257 | guez | 70 | sw.f90 |
258 | guez | 81 | swr.f90 |
259 | swtt1.f90 | ||
260 | swtt.f90 | ||
261 | swu.f90 | ||
262 | guez | 70 | tau2alpha.f90 |
263 | guez | 81 | tetalevel.f90 |
264 | guez | 70 | thermcell.f90 |
265 | tlift.f90 | ||
266 | guez | 79 | tourabs.f90 |
267 | guez | 70 | tracstoke.f90 |
268 | guez | 81 | transp.f90 |
269 | transp_lay.f90 | ||
270 | guez | 70 | ustarhb.f90 |
271 | vdif_kcay.f90 | ||
272 | vlsplt.f90 | ||
273 | vlspltqs.f90 | ||
274 | vlx.f90 | ||
275 | vlxqs.f90 | ||
276 | vly.f90 | ||
277 | vlyqs.f90 | ||
278 | vlz.f90 | ||
279 | guez | 81 | wrgrads.f90 |
280 | guez | 70 | writedynav.f90 |
281 | writehist.f90 | ||
282 | yamada4.f90 | ||
283 | guez | 81 | yamada.f90 |
284 | guez | 70 | YOECUMF.f90 |
285 | YOEGWD.f90 | ||
286 | yoethf.f90 | ||
287 | YOMCST.f90 | ||
288 | guez | 81 | zilch.f90 |
ViewVC Help | |
Powered by ViewVC 1.1.21 |