Log of /trunk/libf/dyn3d/Vlsplt
Directory Listing
Revision
40 -
Directory Listing
Modified
Tue Feb 22 13:49:36 2011 UTC
(13 years, 4 months ago)
by
guez
"alpha" useless, always 0, in "exner_hyb".
Revision
39 -
Directory Listing
Modified
Tue Jan 25 15:11:05 2011 UTC
(13 years, 5 months ago)
by
guez
"pi" comes from "nr_util". Removed subroutine "initialize" in module
"comconst".
Copied the content of "fxy_sin.h" into "fxysinus", instead of getting
it from an "include" line. Removed file "fxy_sin.h".
"ps" has rank 2 in "gcm" and "dynetat0".
Assumed-shape for argument "q" of "integrd".
Revision
32 -
Directory Listing
Modified
Tue Apr 6 17:52:58 2010 UTC
(14 years, 3 months ago)
by
guez
Split "stringop.f90" into single-procedure files. Gathered files in directory
"IOIPSL/Stringop".
Split "flincom.f90" into "flincom.f90" and "flinget.f90". Removed
unused procedures from module "flincom". Removed unused argument
"filename" of procedure "flinopen_nozoom".
Removed unused files.
Split "grid_change.f90" into "grid_change.f90" and
"gr_phy_write_3d.f90".
Removed unused procedures from modules "calendar", "ioipslmpp",
"grid_atob", "gath_cpl" and "getincom". Removed unused procedures in
files "ppm3d.f" and "thermcell.f".
Split "mathelp.f90" into "mathelp.f90" and "mathop.f90".
Removed unused variable "dpres" of module "comvert".
Use argument "itau" instead of local variables "iadvtr" and "first" to
control algorithm in procedure "fluxstokenc".
Removed unused arguments of procedure "integrd".
Removed useless computations at the end of procedure "leapfrog".
Merged common block "matrfil" into module "parafilt".
Revision
31 -
Directory Listing
Added
Thu Apr 1 14:59:19 2010 UTC
(14 years, 3 months ago)
by
guez
Split "vlsplt.f" in single-procedure files. Gathered the files in
directory "dyn3d/Vlsplt".
Defined "pbarum(:, 1, :)" and "pbarum(:, jjm + 1, :)" in procedure
"groupe".