/[lmdze]
ViewVC logotype

Revision 54


Jump to revision: Previous Next
Author: guez
Date: Tue Dec 6 15:07:04 2011 UTC (12 years, 4 months ago)
Changed paths: 43
Log Message:
Removed Numerical Recipes procedure "ran1". Replaced calls to "ran1"
in "inidissip" by calls to intrinsic procedures.

Split file "interface_surf.f90" into a file with a module containing
only variables, "interface_surf", and single-procedure files. Gathered
files into directory "Interface_surf".

Added argument "cdivu" to "gradiv" and "gradiv2", "cdivh" to
"divgrad2" and "divgrad", and "crot" to "nxgraro2" and
"nxgrarot". "dissip" now uses variables "cdivu", "cdivh" and "crot"
from module "inidissip_m", so it can pass them to "gradiv2",
etc. Thanks to this modification, we avoid a circular dependency
betwwen "inidissip.f90" and "gradiv2.f90", etc. The value -1. used by
"gradiv2", for instance, during computation of eigenvalues is not the
value "cdivu" computed by "inidissip".

Extracted procedure "start_inter_3d" from module "startdyn", to its
own module.

In "inidissip", unrolled loop on "ii". I find it clearer now.

Moved variables "matriceun", "matriceus", "matricevn", "matricevs",
"matrinvn" and "matrinvs" from module "parafilt" to module
"inifilr_m". Moved variables "jfiltnu", "jfiltnv", "jfiltsu",
"jfiltsv" from module "coefils" to module "inifilr_m".


Changed paths

Path Details
Directorytrunk/libf/GNUmakefile modified , text changed
Directorytrunk/libf/depend.mk modified , text changed
Directorytrunk/libf/dyn3d/bilan_dyn.f90 modified , text changed
Directorytrunk/libf/dyn3d/comdissnew.f90 modified , text changed
Directorytrunk/libf/dyn3d/dissip.f90 modified , text changed
Directorytrunk/libf/dyn3d/divgrad.f modified , text changed
Directorytrunk/libf/dyn3d/divgrad2.f modified , text changed
Directorytrunk/libf/dyn3d/etat0.f90 modified , text changed
Directorytrunk/libf/dyn3d/gcm.f90 modified , text changed
Directorytrunk/libf/dyn3d/gradiv.f modified , text changed
Directorytrunk/libf/dyn3d/gradiv2.f deleted
Directorytrunk/libf/dyn3d/gradiv2.f90
(Copied from trunk/libf/dyn3d/gradiv2.f, r53)
added , text changed
Directorytrunk/libf/dyn3d/inidissip.f90 modified , text changed
Directorytrunk/libf/dyn3d/nxgraro2.f modified , text changed
Directorytrunk/libf/dyn3d/nxgrarot.f modified , text changed
Directorytrunk/libf/dyn3d/ran1.f deleted
Directorytrunk/libf/dyn3d/start_inter_3d.f90 added
Directorytrunk/libf/dyn3d/startdyn.f90 modified , text changed
Directorytrunk/libf/filtrez/coefils.f90 modified , text changed
Directorytrunk/libf/filtrez/filtreg.f90 modified , text changed
Directorytrunk/libf/filtrez/inifilr.f90 modified , text changed
Directorytrunk/libf/filtrez/parafilt.f90 deleted
Directorytrunk/libf/make.sh deleted
Directorytrunk/libf/phylmd/Interface_surf/ added
Directorytrunk/libf/phylmd/Interface_surf/calcul_fluxs.f90 added
Directorytrunk/libf/phylmd/Interface_surf/conf_interface.f90
(Copied from trunk/libf/phylmd/conf_interface.f90, r53)
added
Directorytrunk/libf/phylmd/Interface_surf/fonte_neige.f90 added
Directorytrunk/libf/phylmd/Interface_surf/interface_surf.f90
(Copied from trunk/libf/phylmd/interface_surf.f90, r53)
added , text changed
Directorytrunk/libf/phylmd/Interface_surf/interfoce_lim.f90 added
Directorytrunk/libf/phylmd/Interface_surf/interfoce_slab.f90 added
Directorytrunk/libf/phylmd/Interface_surf/interfsur_lim.f90 added
Directorytrunk/libf/phylmd/Interface_surf/interfsurf_hq.f90 added
Directorytrunk/libf/phylmd/Orography/gwprofil.f90 modified , text changed
Directorytrunk/libf/phylmd/Orography/orodrag.f90 modified , text changed
Directorytrunk/libf/phylmd/Orography/sugwd.f90 modified , text changed
Directorytrunk/libf/phylmd/Thermcell/thermcell.f90 modified , text changed
Directorytrunk/libf/phylmd/calltherm.f90 modified , text changed
Directorytrunk/libf/phylmd/clqh.f90 modified , text changed
Directorytrunk/libf/phylmd/conf_interface.f90 deleted
Directorytrunk/libf/phylmd/ctherm.f90 modified , text changed
Directorytrunk/libf/phylmd/interface_surf.f90 deleted
Directorytrunk/libf/phylmd/phyredem.f90 modified , text changed
Directorytrunk/libf/phylmd/physiq.f90 modified , text changed

  ViewVC Help
Powered by ViewVC 1.1.21