Parent Directory
| 
Revision Log
Variable pls of module pressure_var was only modified by calfis but I could not move it to module calfis_m because it was used by a procedure called by calfis (it would have been a cyclic dependency). In the same way, variable p3d of module pressure_var was only modified by leapfrog but I could not move it to module leapfrog_m. So removed module pressure_var. p3d becomes a local variable of leapfrog and an argument of calfis. Use paprs and play in regr_pr_int and regr_pr_av (following LMDZ). The idea in regr_pr_int and regr_pr_av is to spread and pack before the regridding instead of packing afterward. The cost in memory should only be a two-dimensional temporary array created by spread. The cost in clarity is only the transiting of paprs and pplay through regr_pr_comb_coefoz, but this is more than compensated by removing the side effect on module variables.
| 1 | guez | 123 | aaam_bud.f |
| 2 | abort_gcm.f | ||
| 3 | academic.f | ||
| 4 | acc.f | ||
| 5 | adaptdt.f | ||
| 6 | addfi.f | ||
| 7 | advect.f | ||
| 8 | advn.f | ||
| 9 | advtrac.f | ||
| 10 | advx.f | ||
| 11 | advxp.f | ||
| 12 | advy.f | ||
| 13 | advyp.f | ||
| 14 | advz.f | ||
| 15 | advzp.f | ||
| 16 | aeropt.f | ||
| 17 | ajsec.f | ||
| 18 | alboc_cd.f | ||
| 19 | alboc.f | ||
| 20 | albsno.f | ||
| 21 | bernoui.f | ||
| 22 | bilan_dyn.f | ||
| 23 | buildop.f | ||
| 24 | caladvtrac.f | ||
| 25 | calbeta.f | ||
| 26 | calcul_fluxs.f | ||
| 27 | caldyn.f | ||
| 28 | calendar.f | ||
| 29 | calfis.f | ||
| 30 | calltherm.f | ||
| 31 | chem.f | ||
| 32 | clcdrag.f | ||
| 33 | cleanstr.f | ||
| 34 | clesphys2.f | ||
| 35 | clesphys.f | ||
| 36 | clmain.f | ||
| 37 | clouds_gno.f | ||
| 38 | clqh.f | ||
| 39 | cltrac.f | ||
| 40 | cltracrn.f | ||
| 41 | clvent.f | ||
| 42 | coefcdrag.f | ||
| 43 | coefkz2.f | ||
| 44 | coefkz.f | ||
| 45 | coefkzmin.f | ||
| 46 | coefpoly.f | ||
| 47 | comconst.f | ||
| 48 | comdissnew.f | ||
| 49 | comfisrtilp.f | ||
| 50 | comgeom.f | ||
| 51 | comgeomphy.f | ||
| 52 | com_io_dyn.f | ||
| 53 | concvl.f | ||
| 54 | conema3_m.f | ||
| 55 | conf_gcm.f | ||
| 56 | conf_guide.f | ||
| 57 | conflx.f | ||
| 58 | conf_phys.f | ||
| 59 | convflu.f | ||
| 60 | convmas.f | ||
| 61 | coordij.f | ||
| 62 | correctbid.f | ||
| 63 | covcont.f | ||
| 64 | covnat.f | ||
| 65 | createnewfield.f | ||
| 66 | ctherm.f | ||
| 67 | cv3_closure.f | ||
| 68 | cv3_compress.f | ||
| 69 | cv3_feed.f | ||
| 70 | cv3_mixing.f | ||
| 71 | cv3_param.f | ||
| 72 | cv3_prelim.f | ||
| 73 | cv3_tracer.f | ||
| 74 | cv3_trigger.f | ||
| 75 | cv3_uncompress.f | ||
| 76 | cv3_undilute1.f | ||
| 77 | cv3_undilute2.f | ||
| 78 | cv3_unsat.f | ||
| 79 | cv3_yield.f | ||
| 80 | cv_closure.f | ||
| 81 | cv_compress.f | ||
| 82 | cv_driver.f | ||
| 83 | cv_feed.f | ||
| 84 | cv_flag.f | ||
| 85 | cvflag.f | ||
| 86 | cvltr.f | ||
| 87 | cv_mixing.f | ||
| 88 | cv_param.f | ||
| 89 | cv_prelim.f | ||
| 90 | cv_thermo.f | ||
| 91 | cvthermo.f | ||
| 92 | cv_trigger.f | ||
| 93 | cv_uncompress.f | ||
| 94 | cv_undilute1.f | ||
| 95 | cv_undilute2.f | ||
| 96 | cv_unsat.f | ||
| 97 | cv_yield.f | ||
| 98 | decoop.f | ||
| 99 | diagcld1.f | ||
| 100 | diagcld2.f | ||
| 101 | diagetpq.f | ||
| 102 | diagphy.f | ||
| 103 | dimens_m.f | ||
| 104 | dimphy.f | ||
| 105 | dimsoil.f | ||
| 106 | dissip.f | ||
| 107 | disvert.f | ||
| 108 | divergf.f | ||
| 109 | diverg_gam.f | ||
| 110 | divgrad2.f | ||
| 111 | dqthermcell2.f | ||
| 112 | dqthermcell.f | ||
| 113 | drag_noro.f | ||
| 114 | dteta1.f | ||
| 115 | dudv1.f | ||
| 116 | dudv2.f | ||
| 117 | dvthermcell2.f | ||
| 118 | dynetat0.f | ||
| 119 | dynredem0.f | ||
| 120 | dynredem1.f | ||
| 121 | enercin.f | ||
| 122 | ener.f | ||
| 123 | errioipsl.f | ||
| 124 | exner_hyb.f | ||
| 125 | FCTTRE.f | ||
| 126 | guez | 136 | filtreg_hemisph.f |
| 127 | guez | 137 | filtreg_scal.f |
| 128 | filtreg_v.f | ||
| 129 | guez | 123 | findsep.f |
| 130 | find_str.f | ||
| 131 | fisrtilp.f | ||
| 132 | flumass.f | ||
| 133 | fluxstokenc.f | ||
| 134 | flxadjtq.f | ||
| 135 | flxasc.f | ||
| 136 | flxbase.f | ||
| 137 | flxddraf.f | ||
| 138 | flxdlfs.f | ||
| 139 | flxdtdq.f | ||
| 140 | flxflux.f | ||
| 141 | flxini.f | ||
| 142 | flxmain.f | ||
| 143 | fonte_neige.f | ||
| 144 | gcm.f | ||
| 145 | geopot.f | ||
| 146 | getfieldindex.f | ||
| 147 | getso4fromfile.f | ||
| 148 | grad.f | ||
| 149 | gradiv2.f | ||
| 150 | gradsdef.f | ||
| 151 | gr_fi_ecrit.f | ||
| 152 | grid_change.f | ||
| 153 | groupe.f | ||
| 154 | groupeun.f | ||
| 155 | gr_phy_write_3d.f | ||
| 156 | gr_u_scal.f | ||
| 157 | gr_v_scal.f | ||
| 158 | guide.f | ||
| 159 | gwprofil.f | ||
| 160 | gwstress.f | ||
| 161 | hbtm.f | ||
| 162 | heavyside.f | ||
| 163 | hgardfou.f | ||
| 164 | histbeg_totreg.f | ||
| 165 | histclo.f | ||
| 166 | histcom_var.f | ||
| 167 | histdef.f | ||
| 168 | histend.f | ||
| 169 | histhori_regular.f | ||
| 170 | histsync.f | ||
| 171 | histvar_seq.f | ||
| 172 | histvert.f | ||
| 173 | histwrite.f | ||
| 174 | histwrite_real.f | ||
| 175 | indicesol.f | ||
| 176 | iniadvtrac.f | ||
| 177 | inidissip.f | ||
| 178 | inifgn.f | ||
| 179 | inifilr.f | ||
| 180 | ini_histins.f | ||
| 181 | initdynav.f | ||
| 182 | init_dynzon.f | ||
| 183 | initfluxsto.f | ||
| 184 | inithist.f | ||
| 185 | initial0.f | ||
| 186 | initphysto.f | ||
| 187 | initrrnpb.f | ||
| 188 | init_tau2alpha.f | ||
| 189 | integrd.f | ||
| 190 | interface_surf.f | ||
| 191 | interfoce_lim.f | ||
| 192 | interfsurf_hq.f | ||
| 193 | interfsur_lim.f | ||
| 194 | interpost.f | ||
| 195 | interpre.f | ||
| 196 | guez | 131 | invert_zoom_x.f |
| 197 | guez | 123 | ioconf_calendar.f |
| 198 | ioget_calendar.f | ||
| 199 | ioipslmpp.f | ||
| 200 | isittime.f | ||
| 201 | ismax.f | ||
| 202 | ismin.f | ||
| 203 | itau2date.f | ||
| 204 | ju2ymds.f | ||
| 205 | laplacien.f | ||
| 206 | laplacien_gam.f | ||
| 207 | laplacien_rot.f | ||
| 208 | laplacien_rotgam.f | ||
| 209 | leapfrog.f | ||
| 210 | lift_noro.f | ||
| 211 | limx.f | ||
| 212 | limy.f | ||
| 213 | limz.f | ||
| 214 | lwb.f | ||
| 215 | lwbv.f | ||
| 216 | lwc.f | ||
| 217 | lw.f | ||
| 218 | lwtt.f | ||
| 219 | lwttm.f | ||
| 220 | lwu.f | ||
| 221 | lwvb.f | ||
| 222 | lwvd.f | ||
| 223 | lwv.f | ||
| 224 | lwvn.f | ||
| 225 | massbar.f | ||
| 226 | massbarxy.f | ||
| 227 | massdair.f | ||
| 228 | mathelp.f | ||
| 229 | mathop2.f | ||
| 230 | mathop.f | ||
| 231 | minmax.f | ||
| 232 | minmaxqfi.f | ||
| 233 | moycum.f | ||
| 234 | nat2gcm.f | ||
| 235 | newmicro.f | ||
| 236 | nflxtr.f | ||
| 237 | nuage.f | ||
| 238 | nxgrad.f | ||
| 239 | nxgrad_gam.f | ||
| 240 | nxgraro2.f | ||
| 241 | o3_chem.f | ||
| 242 | orbite.f | ||
| 243 | orodrag.f | ||
| 244 | orolift.f | ||
| 245 | orosetup.f | ||
| 246 | ozonecm.f | ||
| 247 | paramet_m.f | ||
| 248 | pentes_ini.f | ||
| 249 | phyetat0.f | ||
| 250 | phyredem.f | ||
| 251 | guez | 157 | phyredem0.f |
| 252 | guez | 123 | physiq.f |
| 253 | phystokenc.f | ||
| 254 | phytrac.f | ||
| 255 | ppm3d.f | ||
| 256 | prather.f | ||
| 257 | pres2lev.f | ||
| 258 | press_coefoz.f | ||
| 259 | guez | 124 | principal_cshift.f |
| 260 | guez | 123 | printflag.f |
| 261 | qcheck.f | ||
| 262 | qminimum.f | ||
| 263 | q_sat.f | ||
| 264 | raddim.f | ||
| 265 | raddimlw.f | ||
| 266 | radepsi.f | ||
| 267 | radiornpb.f | ||
| 268 | radlwsw.f | ||
| 269 | radopt.f | ||
| 270 | read_reanalyse.f | ||
| 271 | readsulfate.f | ||
| 272 | readsulfate_preind.f | ||
| 273 | reanalyse2nat.f | ||
| 274 | regr_pr_av.f | ||
| 275 | regr_pr_comb_coefoz.f | ||
| 276 | regr_pr_int.f | ||
| 277 | rotatf.f | ||
| 278 | rotat_nfil.f | ||
| 279 | scopy.f | ||
| 280 | screenc.f | ||
| 281 | screenp.f | ||
| 282 | soil.f | ||
| 283 | sortvarc.f | ||
| 284 | ssum.f | ||
| 285 | stdlevvar.f | ||
| 286 | strlowercase.f | ||
| 287 | suphec.f | ||
| 288 | sw1s.f | ||
| 289 | sw2s.f | ||
| 290 | swclr.f | ||
| 291 | swde.f | ||
| 292 | sw.f | ||
| 293 | swr.f | ||
| 294 | swtt1.f | ||
| 295 | swtt.f | ||
| 296 | swu.f | ||
| 297 | tau2alpha.f | ||
| 298 | temps.f | ||
| 299 | thermcell.f | ||
| 300 | tourpot.f | ||
| 301 | tracstoke.f | ||
| 302 | trans_buff.f | ||
| 303 | transp.f | ||
| 304 | transp_lay.f | ||
| 305 | unit_nml_m.f | ||
| 306 | ustarhb.f | ||
| 307 | vdif_kcay.f | ||
| 308 | vitvert.f | ||
| 309 | vlsplt.f | ||
| 310 | vlspltqs.f | ||
| 311 | vlx.f | ||
| 312 | vlxqs.f | ||
| 313 | vly.f | ||
| 314 | vlyqs.f | ||
| 315 | vlz.f | ||
| 316 | writedynav.f | ||
| 317 | writefield.f | ||
| 318 | writehist.f | ||
| 319 | yamada4.f | ||
| 320 | yamada.f | ||
| 321 | ymds2ju.f | ||
| 322 | YOECUMF.f | ||
| 323 | YOEGWD.f | ||
| 324 | yoethf.f | ||
| 325 | YOMCST.f | ||
| 326 | zenang.f | ||
| 327 | zilch.f |
| ViewVC Help | |
| Powered by ViewVC 1.1.21 |