Log of /trunk/Sources/bibio
Directory Listing
Revision
138 -
Directory Listing
Modified
Fri May 22 23:13:19 2015 UTC
(9 years, 1 month ago)
by
guez
Moved variable nb_files from module histcom_var to module
histbeg_totreg_m.
Removed unused argument q of writehist.
No history file is created in program ce0l so there is no need to call
histclo in etat0.
In phyredem, access variables rlat and rlon directly from module
phyetat0_m instead of having them as arguments. This is clearer for
the program gcm. There are bad side effects for the program ce0l: we
have to modify the module variables rlat and rlon in procedure etat0,
and we need the additional file phyetat0.f to compile ce0l.
Revision
134 -
Directory Listing
Modified
Wed Apr 29 15:47:56 2015 UTC
(9 years, 2 months ago)
by
guez
Copied from:
trunk/bibio revision 133
Sources inside, compilation outside.
Revision
129 -
Directory Listing
Modified
Fri Feb 13 18:22:38 2015 UTC
(9 years, 4 months ago)
by
guez
Original Path:
trunk/bibio
Removed arguments day0, anne0 of procedures initdynav and
inithist. Use directly day_ref, annee_ref instead.
Moved variables annee_ref, day_ref of module temps to module
dynetat0_m. Deleted variables dayref and anneeref of module conf_gcm_m
and removed them from namelist conf_gcm_nml. These variables were
troubling intermediary on the way to annee_ref and day_ref. Gave as
default values to annee_ref and day_ref the default values of dayref
and anneeref. Moved the test on raz_date from main unit gcm to
procedure dynetat0. Created namelist dynetat0_nml. Read annee_ref and
day_ref from standard input in dynetat0 and redefine them from
"start.nc" if not raz_date. Rationale: 1 - Choose the best programming
from the point of view of program gcm only, forgetting program ce0l. 2
- The normal case is to define annee_ref and day_ref from "start.nc"
so put them in module dynetat0_m rather than in conf_gcm_m. 3 - Try to
always read the same namelists in the same order regardless of choices
in previous namelists. Downsides: 1 -We now need the file "dynetat0.f"
for the program ce0l, because dynetat0_m is used by dynredem0. 2 - We
need to define annee_ref and day_ref from procedure etat0.
Removed useless variable day_end of module temps.
Revision
115 -
Directory Listing
Modified
Fri Sep 19 17:36:20 2014 UTC
(9 years, 9 months ago)
by
guez
Original Path:
trunk/bibio
Extracted code from tau2alpha for first call into new procedure
init_tau2alpha. dxdys, dxdyu, dxdyv are now local variables if guide
computed by init_tau2alpha. This allows us to remove terrible argument
type of tau2alpha: we just give to tau2alpha the right dxdy and
rlat.
In module conf_guide_m, changed default values of tau_min_*, because
0.02 is too small for the default daystep = 240, iperiod = 5. Changed
default values of guide_[uv] to false. Moved variable ok_guide from
conf_gcm_m to conf_guide_m, ok_guide is no longer an input parameter,
it is computed from guide_*. Had then to move test on ok_guide and
day_step from conf_gcm_m to conf_guide_m. Added checks on input
nudging parameters in procedure conf_guide. Upgraded variable factt to
module conf_guide_m in order to check nudging parameters. Bug fix:
variable guide_q was not in namelist conf_guide_nml.
Removed unused variables aire_min, aire_max of MODULE guide_m.
Moved the call to conf_guide from guide to gcm. This was needed to
define ok_guide before getting into guide (since ok_guide is no longer
in conf_gcm_m). Moved test on grossismx and grossismy from tau2alpha
to guide. It is clearer now that only tau_max is used for a regular
grid, and we do not have to repeat this test in each call to
tau2alpha. In guide, we only call writefield when alpha is not a
constant.
Revision
113 -
Directory Listing
Modified
Thu Sep 18 19:56:46 2014 UTC
(9 years, 9 months ago)
by
guez
Original Path:
trunk/bibio
Moved the call to read_serre out of conf_gcm so that it can be called
only in the program ce0l, not in gcm. In gcm, variables of module
serre are read from start file. Added reading of dzoomx, dzoomy, taux,
tauy from start file, in dynetat0. Those variables were written by
dynredem0 but not read.
Removed possibility fxyhypb = false, because the geometric part of the
program is such a mess. Could then remove variables transx, transy,
alphax, alphay, pxo, pyo of module serre.
Bug fix in tau2alpha: missing save attributes. The first call to
tau2alpha needs to compute dxdyu and dxdyv regardless of value of
argument type, because they will be needed for subsequent calls to
tau2alpha with various values of argument type.
Revision
110 -
Directory Listing
Modified
Wed Sep 17 11:55:05 2014 UTC
(9 years, 9 months ago)
by
guez
Original Path:
trunk/bibio
Moved variables of module write_field to module
createnewfield_m. Deleted module variable varid because we know that
varid is always 1. Module variable record was modified in 2 procedures
so Moved assignment:
Record(NbField) = 1
to writefield.
Revision
109 -
Directory Listing
Modified
Wed Sep 17 10:08:00 2014 UTC
(9 years, 9 months ago)
by
guez
Original Path:
trunk/bibio
Moved a call to writefield from guide to tau2alpha. (dxdys does not
change with itau.) So dxdys does not need to be a module variable any
longer. Other variables of modules tau2alpha_m downgraded to local
variables of tau2alpha, since they were not used elsewhere.
Procedures write_field[13]d and formcoord were never called. Could
then remove int2str.
Inline writefield_gen into writefield.
CreateNewField takes an integer array argument instead of 3 scalar
integers. CreateNewField now creates a number of dimensions adapted to
the rank of the output field, instead of always 4 dimensions.
Changed names of variables of module write_field: fieldid to
ncid, fieldindex to record, fieldvarid to varid.
In writefield_gen, if index == -1, no need to call GetFieldIndex
again, we know that the result is nbfield.
In guide, moved calls to writefield for some variables inside if
first_call: those variables do not change with time. Removed ztau:
computed only to be output, does not seem meaningful. Removed
writefield for aire: does not change with time and is already in
"grilles_gcm.nc".
Revision
108 -
Directory Listing
Modified
Tue Sep 16 14:00:41 2014 UTC
(9 years, 9 months ago)
by
guez
Original Path:
trunk/bibio
Imported writefield from LMDZ. Close at the end of gcm the files which
were created by writefiled (not done in LMDZ).
Removed procedures for the output of Grads files. Removed calls to
dump2d. In guide, replaced calls to wrgrads by calls to writefield.
In vlspltqs, removed redundant programming of saturation
pressure. Call foeew from module FCTTRE instead.
Bug fix in interpre: size of w exceeding size of correponding actual
argument wg in advtrac.
In leapfrog, call guide until the end of the run, instead of six hours
before the end.
Bug fix in readsulfate_preind: type of arguments.
Revision
107 -
Directory Listing
Modified
Thu Sep 11 15:09:15 2014 UTC
(9 years, 9 months ago)
by
guez
Original Path:
trunk/bibio
Imported procedure grilles_gcm_sub from LMDZ. Had then to transform
local variable phis of etat to argument.
Replaced calls to lnblnk by calls to trim.
Removed arguments nlat, klevel and griscal of filtreg. Replaced
integer arguments ifiltre and iaire by logical arguments direct and
intensive.
Changed default values of guide_t and guide_q to false.
Revision
105 -
Directory Listing
Modified
Thu Sep 4 10:40:24 2014 UTC
(9 years, 10 months ago)
by
guez
Original Path:
trunk/bibio
Removed intermediate variables in calcul_fluxs.
Revision
104 -
Directory Listing
Modified
Thu Sep 4 10:05:52 2014 UTC
(9 years, 10 months ago)
by
guez
Original Path:
trunk/bibio
Removed procedure sortvarc0. Called sortvarc with an additional
argument resetvarc instead. (Following LMDZ.) Moved current time
computations and some printing statements from sortvarc to
caldyn. Could then remove arguments itau and time_0 of sortvarc, and
could remove "use dynetat0". Better to keep "dynetat0.f" as a gcm-only
file.
Moved some variables from module ener to module sortvarc.
Split file "mathelp.f" into single-procedure files.
Removed unused argument nadv of adaptdt. Removed dimension arguments
of bernoui.
Removed unused argument nisurf of interfoce_lim. Changed the size of
argument lmt_sst of interfoce_lim from klon to knon. Removed case when
newlmt is false.
dynredem1 is called only once in each run, either ce0l or gcm. So
variable nb in call to nf95_put_var was always 1. Removed variable nb.
Removed dimension arguments of calcul_fluxs. Removed unused arguments
precip_rain, precip_snow, snow of calcul_fluxs. Changed the size of
all the arrays in calcul_fluxs from klon to knon.
Removed dimension arguments of fonte_neige. Changed the size of all
the arrays in fonte_neige from klon to knon.
Changed the size of arguments tsurf and tsurf_new of interfsurf_hq
from klon to knon. Changed the size of argument ptsrf of soil from
klon to knon.
Revision
92 -
Directory Listing
Modified
Wed Mar 26 18:16:05 2014 UTC
(10 years, 3 months ago)
by
guez
Original Path:
trunk/bibio
Extracted procedures that were in module calendar into separate files.
Revision
83 -
Directory Listing
Modified
Thu Mar 6 15:12:00 2014 UTC
(10 years, 4 months ago)
by
guez
Original Path:
trunk/bibio
In procedure conf_guide, replaced calls to getpar by reading a
namelist. Removed file getparam.f, now unused. So getin of IOIPSL is
now unused too. Removed files getincom.f, getincom2.f, cmpblank.f,
find_sig.f, gensig.f and nocomma.f.
Moved variables lat_min_guide and lat_max_guide from module
tau2alpha_m to module conf_guide_m.
Removed variables nivsig and nivsigs of module disvert_m. Instead, in
initdynav and initfluxsto, directly wrote arithmetic sequence for
verical axis, pending a better vertical axis. Removed variables nivsig
and nivsigs of "(re)?.start.nc".
In procedure exner_hyb, replaced p(:, :, 1) by equivalent ps.
Revision
82 -
Directory Listing
Modified
Wed Mar 5 14:57:53 2014 UTC
(10 years, 4 months ago)
by
guez
Original Path:
trunk/bibio
Changed all ".f90" suffixes to ".f".
Revision
81 -
Directory Listing
Modified
Wed Mar 5 14:38:41 2014 UTC
(10 years, 4 months ago)
by
guez
Original Path:
trunk/bibio
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).
Revision
70 -
Directory Listing
Modified
Mon Jun 24 15:39:52 2013 UTC
(11 years ago)
by
guez
Original Path:
trunk/libf/bibio
In procedure, "addfi" access directly the module variable "dtphys"
instead of going through an argument.
In "conflx", do not create a local variable for temperature with
reversed order of vertical levels. Instead, give an actual argument
with reversed order in "physiq".
Changed names of variables "rmd" and "rmv" from module "suphec_m" to
"md" and "mv".
In "hgardfou", print only the first temperature out of range found.
Revision
69 -
Directory Listing
Modified
Mon Feb 18 16:33:12 2013 UTC
(11 years, 4 months ago)
by
guez
Original Path:
trunk/libf/bibio
Deleted files cvparam3.f90 and nuagecom.f90. Moved variables from
module cvparam3 to module cv3_param_m. Moved variables rad_chau1 and
rad_chau2 from module nuagecom to module conf_phys_m.
Read clesphys2_nml from conf_phys instead of gcm.
Removed argument iflag_con from several procedures. Access module
variable instead.
Revision
66 -
Directory Listing
Modified
Thu Sep 20 13:00:41 2012 UTC
(11 years, 9 months ago)
by
guez
Original Path:
trunk/libf/bibio
Changed name of module "comvert" to "disvert_m". Changed constant
1. to 0.3 in vertical sampling "strato".
Revision
62 -
Directory Listing
Modified
Thu Jul 26 14:37:37 2012 UTC
(11 years, 11 months ago)
by
guez
Original Path:
trunk/libf/bibio
Changed handling of compiler in compilation system.
Removed the prefix letters "y", "p", "t" or "z" in some names of variables.
Replaced calls to NetCDF by calls to NetCDF95.
Extracted "ioget_calendar" procedures from "calendar.f90" into a
separate file.
Extracted to a separate file, "mathop2.f90", procedures that were not
part of the generic interface "mathop" in "mathop.f90".
Removed computation of "dq" in "bilan_dyn", which was not used.
In "iniadvtrac", removed schemes 20 Slopes and 30 Prather. Was not
compatible with declarations of array sizes.
In "clcdrag", "ustarhb", "vdif_kcay", "yamada4" and "coefkz", changed
the size of some arrays from "klon" to "knon".
Removed possible call to "conema3" in "physiq".
Removed unused argument "cd" in "yamada".
Revision
61 -
Directory Listing
Modified
Fri Apr 20 14:58:43 2012 UTC
(12 years, 2 months ago)
by
guez
Original Path:
trunk/libf/bibio
No more included file in LMDZE, not even "netcdf.inc".
Created a variable containing the list of common source files in
GNUmakefile. So we now also see clearly files that are specific to
each program.
Split module "histcom". Assembled resulting files in directory
"Histcom".
Removed aliasing in calls to "laplacien".
Revision
57 -
Directory Listing
Modified
Mon Jan 30 12:54:02 2012 UTC
(12 years, 5 months ago)
by
guez
Original Path:
trunk/libf/bibio
Write used namelists to file "" instead of standard output.
Avoid aliasing in "inidissip" in calls to "divgrad2", "divgrad",
"gradiv2", "gradiv", "nxgraro2" and "nxgrarot". Add a degenerate
dimension to arrays so they have rank 3, like the dummy arguments in
"divgrad2", "divgrad", "gradiv2", "gradiv", "nxgraro2" and "nxgrarot".
Extract the initialization part from "bilan_dyn" and make a separate
procedure, "init_dynzon", from it.
Move variables from modules "iniprint" and "logic" to module
"conf_gcm_m".
Promote internal procedures of "fxy" to private procedures of module
"fxy_m".
Extracted documentation from "inigeom". Removed useless "save"
attributes. Removed useless intermediate variables. Extracted
processing of poles from loop on latitudes. Write coordinates to file
"longitude_latitude.txt" instead of standard output.
Do not use ozone tracer for radiative transfer.
Revision
56 -
Directory Listing
Modified
Tue Jan 10 19:02:02 2012 UTC
(12 years, 5 months ago)
by
guez
Original Path:
trunk/libf/bibio
Imported "writehist.f" from LMDZ.
Moved module variable "histaveid" from "com_io_dyn" to "initdynav_m".
In "inithist", access directly module variables from "com_io_dyn"
instead of going through the arguments. Copying from LMDZ, write "u"
and scalar variables to separate files. Create a new variable for the
new file in "com_io_dyn". Copying from LMDZ, change the vertical axes
of the three files.
Removed some useless initializations in "dissip".
In "bilan_dyn", removed useless variable "time". Avoiding the
approximate test on "dt_cum" being a multiple of "dt_app", just
compute "ncum" from known usage of "bilan_dyn" and compute "dt_cum"
from "ncum". Change "periodav" from real to integer in
"conf_gcm_m". Since "day_step" is required to be a multiple of
"iperiod", so is "ncum".
Revision
52 -
Directory Listing
Modified
Fri Sep 23 12:28:01 2011 UTC
(12 years, 9 months ago)
by
guez
Original Path:
trunk/libf/bibio
Split "conflx.f" into single-procedure files in directory "Conflx".
Split "cv_routines.f" into single-procedure files in directory
"CV_routines". Made module "cvparam" from included file
"cvparam.h". No included file other than "netcdf.inc" left in LMDZE.
Revision
45 -
Directory Listing
Modified
Wed Apr 27 13:00:12 2011 UTC
(13 years, 2 months ago)
by
guez
Original Path:
trunk/libf/bibio
Split file "histwrite.f90" into "histwrite.f90", "histwrite_real.f90"
and "histvar_seq.f90".
Extracted documentation from "psextbar.f" into "psextbar.txt" (out of SVN).
Revision
44 -
Directory Listing
Modified
Wed Apr 13 12:29:18 2011 UTC
(13 years, 2 months ago)
by
guez
Original Path:
trunk/libf/bibio
Removed argument "pdteta" of "calfis", because it was not used.
Created module "conf_guide_m", containing procedure
"conf_guide". Moved module variables from "guide_m" to "conf_guide_m".
In module "getparam", removed "ini_getparam" and "fin_getparam" from
generic interface "getpar".
Created module variables in "tau2alpha_m" to replace common "comdxdy".
Revision
40 -
Directory Listing
Modified
Tue Feb 22 13:49:36 2011 UTC
(13 years, 4 months ago)
by
guez
Original Path:
trunk/libf/bibio
"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
Original Path:
trunk/libf/bibio
"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
31 -
Directory Listing
Modified
Thu Apr 1 14:59:19 2010 UTC
(14 years, 3 months ago)
by
guez
Original Path:
trunk/libf/bibio
Split "vlsplt.f" in single-procedure files. Gathered the files in
directory "dyn3d/Vlsplt".
Defined "pbarum(:, 1, :)" and "pbarum(:, jjm + 1, :)" in procedure
"groupe".
Revision
30 -
Directory Listing
Modified
Thu Apr 1 09:07:28 2010 UTC
(14 years, 3 months ago)
by
guez
Original Path:
trunk/libf/bibio
Imported Source files of the external library "IOIPSL_Lionel" into
"libf/IOIPSL".
Split "cray.f90" into "scopy.f90" and "ssum.f90".
Rewrote "leapfrog" in order to have a clearer algorithmic structure.
Revision
28 -
Directory Listing
Modified
Fri Mar 26 18:33:04 2010 UTC
(14 years, 3 months ago)
by
guez
Original Path:
trunk/libf/bibio
Removed unused "diagedyn.f" and "undefSTD.f".
In "etat0", the variable "dt" of module "temps" was defined from
"landicered.nc", which was meaningless and useless. Replaced "dt" by a
local trash variable.
Removed variable "dt" from module "temps" and created instead a local
variable of "leapfrog" and an argument of "integrd".
Revision
27 -
Directory Listing
Modified
Thu Mar 25 14:29:07 2010 UTC
(14 years, 3 months ago)
by
guez
Original Path:
trunk/libf/bibio
"dyn3d" and "filtrez" do not contain any included file so make rules
have been updated.
"comdissip.f90" was useless, removed it.
"dynredem0" wrote undefined value in "controle(31)", that was
overwritten by "dynredem1". Now "dynredem0" just writes 0 to
"controle(31)".
Removed arguments of "inidissip". "inidissip" now accesses the
variables by use association.
In program "etat0_lim", "itaufin" is not defined so "dynredem1" wrote
undefined value to "controle(31)". Added argument "itau" of
"dynredem1" to correct that.
"itaufin" does not need to be a module variable (of "temps"), made it
a local variable of "leapfrog".
Removed calls to "diagedyn" from "leapfrog".
Revision
19 -
Directory Listing
Modified
Thu Aug 7 15:46:20 2008 UTC
(15 years, 11 months ago)
by
guez
Original Path:
trunk/libf/bibio
Inlined procedures "regr_pr_av" and "regr_pr_int" in "regr_pr_o3",
"regr_pr_av_coefoz" and "regr_pr_int_coefoz".
Revision
18 -
Directory Listing
Modified
Thu Aug 7 12:29:13 2008 UTC
(15 years, 11 months ago)
by
guez
Original Path:
trunk/libf/bibio
In module "regr_pr", rewrote scanning of horizontal positions as a
single set of loops, using a mask.
Added some "intent" attributes.
In "dynredem0", replaced calls to Fortran 77 interface of NetCDF by
calls to NetCDF95. Removed calls to "nf_redef", regrouped all writing
operations. In "dynredem1", replaced some calls to Fortran 77
interface of NetCDF by calls to Fortran 90 interface.
Renamed variable "nqmax" to "nq_phys".
In "physiq", if "nq >= 5" then "wo" is computed from the
parameterization of "Cariolle".
Revision
15 -
Directory Listing
Modified
Fri Aug 1 15:24:12 2008 UTC
(15 years, 11 months ago)
by
guez
Original Path:
trunk/libf/bibio
-- Minor modification of input/output:
Added variable "Sigma_O3_Royer" to "histday.nc". "ecrit_day" is not
modified in "physiq". Removed variables "pyu1", "pyv1", "ftsol1",
"ftsol2", "ftsol3", "ftsol4", "psrf1", "psrf2", "psrf3", "psrf4"
"mfu", "mfd", "en_u", "en_d", "de_d", "de_u", "coefh" from
"histrac.nc".
Variable "raz_date" of module "conf_gcm_m" has logical type instead of
integer type.
-- Should not change any result at run time:
Modified calls to "IOIPSL_Lionel" procedures because the interfaces of
these procedures have been simplified.
Changed name of variable in module "start_init_orog_m": "masque" to
"mask".
Created a module containing procedure "phyredem".
Removed arguments "punjours", "pdayref" and "ptimestep" of procedure
"iniphysiq".
Renamed procedure "gr_phy_write" to "gr_phy_write_2d". Created
procedure "gr_phy_write_3d".
Removed procedures "ini_undefstd", "moy_undefSTD", "calcul_STDlev",
"calcul_divers".
Revision
13 -
Directory Listing
Modified
Fri Jul 25 19:59:34 2008 UTC
(15 years, 11 months ago)
by
guez
Original Path:
trunk/libf/bibio
-- Minor change of behaviour:
"etat0" does not compute "rugsrel" nor "radpas". Deleted arguments
"radpas" and "rugsrel" of "phyredem". Deleted argument "rugsrel" of
"phyetat0". "startphy.nc" does not contain the variable "RUGSREL". In
"physiq", "rugoro" is set to 0 if not "ok_orodr". The whole program
"etat0_lim" does not use "clesphys2".
-- Minor modification of input/output:
Created subroutine "read_clesphys2". Variables of "clesphys2" are read
in "read_clesphys2" instead of "conf_gcm". "printflag" does not print
variables of "clesphys2".
-- Should not change any result at run time:
References to module "numer_rec" instead of individual modules of
"Numer_rec_Lionel".
Deleted argument "clesphy0" of "calfis", "physiq", "conf_gcm",
"leapfrog", "phyetat0". Deleted variable "clesphy0" in
"gcm". "phyetat0" does not modify variables of "clesphys2".
The program unit "gcm" does not modify "itau_phy".
Added some "intent" attributes.
"regr11_lint" does not call "polint".
Revision
12 -
Directory Listing
Modified
Mon Jul 21 16:05:07 2008 UTC
(15 years, 11 months ago)
by
guez
Original Path:
trunk/libf/bibio
-- Minor modification of input/output:
Created procedure "read_logic". Variables of module "logic" are read
by "read_logic" instead of "conf_gcm". Variable "offline" of module
"conf_gcm" is read from namelist instead of "*.def".
Deleted arguments "dtime", "co2_ppm_etat0", "solaire_etat0",
"tabcntr0" and local variables "radpas", "tab_cntrl" of
"phyetat0". "phyetat0" does not read "controle" in "startphy.nc" any
longer. "phyetat0" now reads global attribute "itau_phy" from
"startphy.nc". "phyredem" does not create variable "controle" in
"startphy.nc" any longer. "phyredem" now writes global attribute
"itau_phy" of "startphy.nc". Deleted argument "tabcntr0" of
"printflag". Removed diagnostic messages written by "printflag" for
comparison of the variable "controle" of "startphy.nc" and the
variables read from "*.def" or namelist input.
-- Removing unwanted functionality:
Removed variable "lunout" from module "iniprint", replaced everywhere
by standard output.
Removed case "ocean == 'couple'" in "clmain", "interfsurf_hq" and
"physiq". Removed procedure "interfoce_cpl".
-- Should not change anything at run time:
Automated creation of graphs in documentation. More documentation on
input files.
Converted Fortran files to free format: "phyredem.f90", "printflag.f90".
Split module "clesphy" into "clesphys" and "clesphys2".
Removed variables "conser", "leapf", "forward", "apphys", "apdiss" and
"statcl" from module "logic". Added arguments "conser" to "advect",
"leapf" to "integrd". Added local variables "forward", "leapf",
"apphys", "conser", "apdiss" in "leapfrog".
Added intent attributes.
Deleted arguments "dtime" of "phyredem", "pdtime" of "flxdtdq", "sh"
of "phytrac", "dt" of "yamada".
Deleted local variables "dtime", "co2_ppm_etat0", "solaire_etat0",
"length", "tabcntr0" in "physiq". Replaced all references to "dtime"
by references to "pdtphys".
Revision
10 -
Directory Listing
Modified
Fri Apr 18 14:45:53 2008 UTC
(16 years, 2 months ago)
by
guez
Original Path:
trunk/libf/bibio
Added NetCDF directory "/home/guez/include" in "g95.mk" and
"nag_tools.mk".
Added some "intent" attributes in "PVtheta", "advtrac", "caladvtrac",
"calfis", "diagedyn", "dissip", "vlspltqs", "aeropt", "ajsec",
"calltherm", "clmain", "cltrac", "cltracrn", "concvl", "conema3",
"conflx", "fisrtilp", "newmicro", "nuage", "diagcld1", "diagcld2",
"drag_noro", "lift_noro", "SUGWD", "physiq", "phytrac", "radlwsw", "thermcell".
Removed the case "ierr == 0" in "abort_gcm"; moved call to "histclo"
and messages for end of run from "abort_gcm" to "gcm"; replaced call
to "abort_gcm" in "leapfrog" by exit from outer loop.
In "calfis": removed argument "pp" and variable "unskap"; changed
"pksurcp" from scalar to rank 2; use "pressure_var"; rewrote
computation of "zplev", "zplay", "ztfi", "pcvgt" using "dyn_phy";
added computation of "pls".
Removed unused variable in "dynredem0".
In "exner_hyb": changed "dellta" from scalar to rank 1; replaced call
to "ssum" by call to "sum"; removed variables "xpn" and "xps";
replaced some loops by array expressions.
In "leapfrog": use "pressure_var"; deleted variables "p", "longcles".
Converted common blocks "YOECUMF", "YOEGWD" to modules.
Removed argument "pplay" in "cvltr", "diagetpq", "nflxtr".
Created module "raddimlw" from include file "raddimlw.h".
Corrected call to "new_unit" in "test_disvert".
Revision
9 -
Directory Listing
Modified
Mon Mar 31 13:58:05 2008 UTC
(16 years, 3 months ago)
by
guez
Original Path:
trunk/libf/bibio
New variables "*_dir" in "g95.mk".
Corrected some bugs: "etat0_lim" works, but not "gcm".
Revision
8 -
Directory Listing
Modified
Mon Mar 31 12:51:21 2008 UTC
(16 years, 3 months ago)
by
guez
Original Path:
trunk/libf/bibio
This revision is not in working order. Pending some moving of files.
Moving files around.