Log of /trunk/Compilation/GNUmakefile
Parent Directory
|
Revision Log
Revision
97 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Apr 25 14:58:31 2014 UTC
(10 years, 4 months ago)
by
guez
File length: 1577 byte(s)
Diff to
previous 94
,
to
selected 34
Module pressure_var is now only used in gcm. Created local variables
pls and p3d in etat0, added argument p3d to regr_pr_o3.
In leapfrog, moved computation of p3d and exner function immediately
after integrd, for clarity (does not change the execution).
Removed unused arguments: ntra, tra1 and tra of cv3_compress; ntra,
tra and traent of cv3_mixing; ntra, ftra, ftra1 of cv3_uncompress;
ntra, tra, trap of cv3_unsat; ntra, tra, trap, traent, ftra of
cv3_yield; tra, tvp, pbase, bbase, dtvpdt1, dtvpdq1, dplcldt,
dplcldr, ntra of concvl; ndp1, ntra, tra1 of cv_driver
Removed argument d_tra and computation of d_tra in concvl. Removed
argument ftra1 and computation of ftra1 in cv_driver. ftra1 was just
set to 0 in cv_driver, associated to d_tra in concvl, and set again to
zero in concvl.
Revision
90 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Mar 12 21:16:36 2014 UTC
(10 years, 5 months ago)
by
guez
Original Path:
trunk/GNUmakefile
File length: 1557 byte(s)
Diff to
previous 83
,
to
selected 34
Removed procedures ini_histday, ini_histhf, write_histday and
write_histhf.
Divided file regr_pr_coefoz.f into regr_pr_av.f and
regr_pr_int.f. (Following LMDZ.) Divided module regr_pr_coefoz into
modules regr_pr_av_m and regr_pr_int_m. Renamed regr_pr_av_coefoz to
regr_pr_av and regr_pr_int_coefoz to regr_pr_int. The idea is that
those procedures are more general than Mobidic.
Removed argument dudyn of calfis and physiq. dudyn is not used either
in LMDZ. Removed computation in calfis of unused variable zpsrf (not
used either in LMDZ). Removed useless computation of dqfi in calfis
(part 62): the results were overwritten. (Same in LMDZ.)
Revision
83 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Mar 6 15:12:00 2014 UTC
(10 years, 5 months ago)
by
guez
Original Path:
trunk/GNUmakefile
File length: 1536 byte(s)
Diff to
previous 82
,
to
selected 34
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
81 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Mar 5 14:38:41 2014 UTC
(10 years, 5 months ago)
by
guez
Original Path:
trunk/GNUmakefile
File length: 1788 byte(s)
Diff to
previous 79
,
to
selected 34
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
79 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Feb 28 17:52:47 2014 UTC
(10 years, 6 months ago)
by
guez
Original Path:
trunk/GNUmakefile
File length: 1781 byte(s)
Diff to
previous 78
,
to
selected 34
Moved procedure iniconst inside module comconst. Removed useless
variables of module comconst: im, jm, lllm, imp1, jmp1, lllmm1,
lllmp1, lcl, cotot, unsim. Move definition of dtvr that was in
dynetat0 and etat0 to iniconst. Moved comparison of dtvr from day_step
and start.nc that was in gcm to dynetat0. Moved call to disvert out of
iniconst. Moved call to iniconst in gcm before call to dynetat0.
Removed unused argument pvteta of physiq (not used either in LMDZ).
Revision
78 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Feb 5 17:51:07 2014 UTC
(10 years, 6 months ago)
by
guez
Original Path:
trunk/GNUmakefile
File length: 1831 byte(s)
Diff to
previous 76
,
to
selected 34
Moved procedure inigeom into module comgeom.
In disvert, renamed s_sampling to vert_sampling, following
LMDZ. Removed choice strato1. In case read, read ap and bp instead of
s (following LMDZ).
Added argument phis to start_init_orog and start_init_dyn, and removed
variable phis of module start_init_orog_m. In etat0 and
start_init_orog, renamed relief to zmea_2d. In start_init_dyn, renamed
psol to ps.
In start_init_orog, renamed relief_hi to relief. No need to set
phis(iim + 1, :) = phis(1, :), already done in grid_noro.
Documentation for massbar out of SVN, in massbar.txt. Documentation
was duplicated in massdair, but not relevant in massdair.
In conflx, no need to initialize pen_[ud] and pde_[ud]. In flxasc,
used intermediary variable fact (following LMDZ).
In grid_noro, added local variable zmea0 for zmea not smoothed and
computed zphi from zmea instead of zmea0 (following LMDZ). This
changes the results of ce0l.
Removed arguments pen_u and pde_d of phytrac and nflxtr, which were
not used.
Revision
73 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Nov 15 17:48:30 2013 UTC
(10 years, 9 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 2246 byte(s)
Diff to
previous 71
,
to
selected 34
Renamed tpot to teta and psol to ps in etat0.
Replaced calls to flincom by calls to NetCDF95 in startdyn. lon_ini,
lat_ini and levdyn_ini are now pointers.
Revision
71 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Jul 8 18:12:18 2013 UTC
(11 years, 1 month ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 2245 byte(s)
Diff to
previous 70
,
to
selected 34
No reason to call inidissip in ce0l.
In inidissip, set random seed to 1 beacuse PGI compiler does not
accept all zeros.
dq was computed needlessly in caladvtrac. Arguments masse and dq of
calfis not used.
Replaced real*8 by double precision.
Pass arrays with inverted order of vertical levels to conflx instead
of creating local variables for this inside conflx.
Revision
70 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Jun 24 15:39:52 2013 UTC
(11 years, 2 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 2310 byte(s)
Diff to
previous 69
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Feb 18 16:33:12 2013 UTC
(11 years, 6 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6879 byte(s)
Diff to
previous 68
,
to
selected 34
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
68 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Nov 14 16:59:30 2012 UTC
(11 years, 9 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6839 byte(s)
Diff to
previous 67
,
to
selected 34
Split "flincom.f90" into "flinclo.f90", "flinfindcood.f90",
"flininfo.f90" and "flinopen_nozoom.f90", in directory
"IOIPSL/Flincom".
Renamed "etat0_lim" to "ce0l", as in LMDZ.
Split "readsulfate.f" into "readsulfate.f90", "readsulfate_preind.f90"
and "getso4fromfile.f90".
In etat0, renamed variable q3d to q, as in "dynredem1". Replaced calls
to Flicom procedures by calls to NetCDF95.
In leapfrog, added call to writehist.
Extracted ASCII art from "grid_noro" into a file
"grid_noro.txt". Transformed explicit-shape local arrays into
automatic arrays, so that test on values of iim and jjm is no longer
needed. Test on weight:
IF (weight(ii, jj) /= 0.) THEN
is useless. There is already a test before:
if (any(weight == 0.)) stop "zero weight in grid_noro"
In "aeropt", replaced duplicated lines with different values of inu by
a loop on inu.
Removed arguments of "conf_phys". Corresponding variables are now
defined in "physiq", in a namelist. In "conf_phys", read a namelist
instead of using getin.
Revision
65 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Sep 20 09:57:03 2012 UTC
(11 years, 11 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6850 byte(s)
Diff to
previous 64
,
to
selected 34
Removed unused procedure "divgrad".
In procedure "dissip", save memory by using intermediary arrays "gdx"
and "gdy" several times instead of additional array "grx" and "gry".
In procedure "inidissip", write "dtdiss * teta*" instead of "teta*".
In "comvert", change name of s_sampling from "LMD5" to "tropo" and
from "strato2" to "strato".
Revision
64 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Aug 29 14:47:17 2012 UTC
(12 years ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6856 byte(s)
Diff to
previous 63
,
to
selected 34
Removed variable lstardis in module comdissnew and procedures gradiv
and nxgrarot. lstardir had to be true. gradiv and nxgrarot were called
if lstardis was false. Removed argument iter of procedure
filtreg. iter had to be 1. gradiv and nxgrarot called filtreg with
iter == 2.
Moved procedure flxsetup into module yoecumf. Module yoecumf is only
used in program units of directory Conflx, moved it there.
Revision
62 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Jul 26 14:37:37 2012 UTC
(12 years, 1 month ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6885 byte(s)
Diff to
previous 61
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Apr 20 14:58:43 2012 UTC
(12 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6618 byte(s)
Diff to
previous 60
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Jan 30 12:54:02 2012 UTC
(12 years, 7 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7465 byte(s)
Diff to
previous 56
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Jan 10 19:02:02 2012 UTC
(12 years, 7 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7461 byte(s)
Diff to
previous 55
,
to
selected 34
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
55 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Dec 12 13:25:01 2011 UTC
(12 years, 8 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7447 byte(s)
Diff to
previous 54
,
to
selected 34
-- In procedure "bilan_dyn", replaced average of "zvq" by integral of
"zvq", following a comment of Francis Codron :
Le calcul actuel donne des unités peu pratiques : transports de
chaleur en K m / s par exemple. C'est bien pour les sorties à 2
dimensions, latitude et pression, car alors le transport ne dépend pas
de l'espacement des niveaux, mieux pour comparer ou tracer en latitude
et pression. Par contre, quand on somme sur la verticale, on
préfèrerait avoir des transports d'énergie en watts, ou au moins an K
kg / s (à multiplier par "Cp" ou "L"). On doit pouvoir recalculer le
transport intégré à partir des fichiers de sortie, mais c'est embêtant
(calcul de "cv").
-- Gathered files in directory Dissipation.
Revision
54 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Dec 6 15:07:04 2011 UTC
(12 years, 8 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7417 byte(s)
Diff to
previous 53
,
to
selected 34
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".
Revision
52 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Sep 23 12:28:01 2011 UTC
(12 years, 11 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7290 byte(s)
Diff to
previous 51
,
to
selected 34
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
51 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Sep 20 09:14:34 2011 UTC
(12 years, 11 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6927 byte(s)
Diff to
previous 49
,
to
selected 34
Split "getincom.f90" into "getincom.f90" and "getincom2.f90". Split
"nuage.f" into "nuage.f90", "diagcld1.f90" and "diagcld2.f90". Created
module "chem" from included file "chem.h". Moved "YOEGWD.f90" to
directory "Orography".
In "physiq", for evaporation of water, "zlsdcp" was equal to
"zlvdc". Removed useless variables.
Revision
49 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Aug 24 11:43:14 2011 UTC
(13 years ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6872 byte(s)
Diff to
previous 48
,
to
selected 34
LMDZE now uses library Jumble.
Removed all calls to "flinget". Replaced calls to "flinget",
"flininfo", "flinopen_nozoom" by calls to NetCDF95 and Jumble.
Split file "cv_driver.f" into "cv_driver.f90", "cv_flag.f90" and
"cv_thermo.f90".
Bug fix: "QANCIEN" was read twice in "phyeytat0".
In "physiq", initialization of "d_t", "d_u", "d_v" was useless.
Revision
47 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Jul 1 15:00:48 2011 UTC
(13 years, 2 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6842 byte(s)
Diff to
previous 46
,
to
selected 34
Split "thermcell.f" and "cv3_routines.f".
Removed copies of files that are now in "L_util".
Moved "mva9" and "diagetpq" to their own files.
Unified variable names across procedures.
Revision
45 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Apr 27 13:00:12 2011 UTC
(13 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6602 byte(s)
Diff to
previous 44
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Apr 13 12:29:18 2011 UTC
(13 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6559 byte(s)
Diff to
previous 43
,
to
selected 34
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
43 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Apr 8 12:43:31 2011 UTC
(13 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6555 byte(s)
Diff to
previous 42
,
to
selected 34
"start_init_phys" is now called directly by "etat0" instead of through
"start_init_dyn". "qsol_2d" is no longer a variable of module
"start_init_phys_m", it is an argument of
"start_init_phys". "start_init_dyn" now receives "tsol_2d" from
"etat0".
Split file "vlspltqs.f" into "vlspltqs.f90", "vlxqs.f90" and
""vlyqs.f90".
In "start_init_orog", replaced calls to "flin*" by calls to NetCDF95.
Revision
38 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Jan 6 17:52:19 2011 UTC
(13 years, 7 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7393 byte(s)
Diff to
previous 37
,
to
selected 34
Extracted ASCII art from "inigeom" into a separate text file in the
documentation.
"test_disvert" now creates a separate file for layer thicknesses.
Moved variables from module "yomcst" to module "suphec_m" because this
is where those variables are defined. Kept in "yomcst" only parameters
of Earth orbit. Gave the attribute "parameter" to some variables of
module "suphec_m".
Variables of module "yoethf" were defined in procedure "suphec". Moved
these definitions to a new procedure "yoethf" in module "yoethf_m".
Revision
37 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Dec 21 15:45:48 2010 UTC
(13 years, 8 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7391 byte(s)
Diff to
previous 36
,
to
selected 34
Inlined procedure "pression".
Split "guide.f90" into "guide.f90" and "tau2alpha.f90". Split
"read_reanalyse.f" into single-procedure files in directory
"Read_reanalyse".
Useless copy of variables in "iniphysiq". Directly define module
variables in "gcm" and remove procedure "iniphysiq".
Added "pressure-altitude" in "test_disvert".
Revision
34 -
(
view)
(
annotate)
-
[selected]
Modified
Wed Jun 2 11:01:12 2010 UTC
(14 years, 2 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7320 byte(s)
Diff to
previous 33
Split "ini_hist.f90" into single-procedure files.
In "calfis" and "physiq", removed dummy argument "nq" since "nq" must
be equal to "nqmx".
In "calfis", renamed dummy argument "pq" to "q", same name as actual
argument in "leapfrog". Renamed local variable "zqfi" to "qx", same
name as dummy argument in "physiq".
Removed arguments "itop_con" and "ibas_con" of "phytrac", which were
not used.
Revision
33 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Apr 9 10:56:14 2010 UTC
(14 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7252 byte(s)
Diff to
previous 32
,
to
selected 34
Test namelist input in procedure "conf_gcm" rather than program unit
"gcm".
Compute "time" in procedure "sortvarc" rather than "leapfrog".
Rewrote "leapfrog" with a single loop on "itau" instead of two nested
loops on number of periodic matsuno-leapfrog cycles and leapfrog
iterations.
Revision
32 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Apr 6 17:52:58 2010 UTC
(14 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 7113 byte(s)
Diff to
previous 31
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Apr 1 14:59:19 2010 UTC
(14 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6986 byte(s)
Diff to
previous 30
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Apr 1 09:07:28 2010 UTC
(14 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6929 byte(s)
Diff to
previous 28
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Mar 26 18:33:04 2010 UTC
(14 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6682 byte(s)
Diff to
previous 27
,
to
selected 34
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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Mar 25 14:29:07 2010 UTC
(14 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6700 byte(s)
Diff to
previous 26
,
to
selected 34
"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
26 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Mar 9 15:27:15 2010 UTC
(14 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6714 byte(s)
Diff to
previous 25
,
to
selected 34
Moved variable "dtdiss" from module "comconst", variable "idissip"
from module "conf_gcm_m" and all variables from module "comdissipn" to
module "inidissip_m". "inidissip" creates file
"inidissip.csv". "idissip" is no longer read from a namelist. Removed
useless computation of "dtdiss" in procedure "iniconst".
Revision
25 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Mar 5 16:43:45 2010 UTC
(14 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6712 byte(s)
Diff to
previous 24
,
to
selected 34
Simplified "etat0_lim.sh" and "gcm.sh" because the full versions
depended on personal arrangements for directories and machines.
Translated included files into modules. Encapsulated procedures into modules.
Moved variables from module "comgeom" to local variables of
"inigeom". Deleted some unused variables in "comgeom".
Moved variable "day_ini" from module "temps" to module "dynetat0_m".
Removed useless test on variable "time" and useless "close" statement
in procedure "leapfrog".
Removed useless call to "inigeom" in procedure "limit".
Revision
23 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Dec 14 15:25:16 2009 UTC
(14 years, 8 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6490 byte(s)
Diff to
previous 22
,
to
selected 34
Split "orografi.f": one file for each procedure. Put the created files
in new directory "Orography".
Removed argument "vcov" of procedure "sortvarc". Removed arguments
"itau" and "time" of procedure "caldyn0". Removed arguments "itau",
"time" and "vcov" of procedure "sortvarc0".
Removed argument "time" of procedure "dynredem1". Removed NetCDF
variable "temps" in files "start.nc" and "restart.nc", because its
value is always 0.
Removed argument "nq" of procedures "iniadvtrac" and "leapfrog". The
number of "tracers read in "traceur.def" must now be equal to "nqmx",
or "nqmx" must equal 4 if there is no file "traceur.def". Replaced
variable "nq" by constant "nqmx" in "leapfrog".
NetCDF variable for ozone field in "coefoz.nc" must now be called
"tro3" instead of "r".
Fixed bug in "zenang".
Revision
18 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Aug 7 12:29:13 2008 UTC
(16 years ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6387 byte(s)
Diff to
previous 17
,
to
selected 34
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
17 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Aug 5 13:31:32 2008 UTC
(16 years ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6385 byte(s)
Diff to
previous 16
,
to
selected 34
Created rule for "compare_sampl_*" files in
"Documentation/Manuel_LMDZE.texfol/Graphiques/GNUmakefile".
Extracted "qcheck", "radiornpb", "minmaxqfi" into separate files.
Read pressure coordinate of ozone coefficients once per run instead of
every day.
Added some "intent" attributes.
Added argument "nq" to "ini_histday". Replaced calls to "gr_fi_ecrit"
by calls to "gr_phy_write_2d". "Sigma_O3_Royer" is written to
"histday.nc" only if "nq >= 4". Moved "ini_histrac" to module
"ini_hist".
Compute "zmasse" in "physiq", pass it to "phytrac".
Removed computations of "pftsol*" and "ppsrf*" in "phytrac".
Do not use variable "rg" from module "YOMCST" in "TLIFT".
Revision
15 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Aug 1 15:24:12 2008 UTC
(16 years, 1 month ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6359 byte(s)
Diff to
previous 13
,
to
selected 34
-- 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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Jul 25 19:59:34 2008 UTC
(16 years, 1 month ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6357 byte(s)
Diff to
previous 12
,
to
selected 34
-- 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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Jul 21 16:05:07 2008 UTC
(16 years, 1 month ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6406 byte(s)
Diff to
previous 10
,
to
selected 34
-- 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 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Fri Apr 18 14:45:53 2008 UTC
(16 years, 4 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6371 byte(s)
Diff to
previous 9
,
to
selected 34
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
7 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Mar 31 12:24:17 2008 UTC
(16 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6255 byte(s)
Diff to
previous 5
,
to
selected 34
This revision is not in working order. Pending some moving of files.
Important changes. In the program "etat0_lim": ozone coefficients from
Mobidic are regridded in time instead of pressure ; consequences in
"etat0". In the program "gcm", ozone coefficients from Mobidic are
read once per day only for the current day and regridded in pressure ;
consequences in "o3_chem_m", "regr_pr_coefoz", "phytrac" and
"regr_pr_comb_coefoz_m".
NetCDF95 is a library and does not export NetCDF.
New variables "nag_gl_options", "nag_fcalls_options" and
"nag_cross_options" in "nag_tools.mk".
"check_coefoz.jnl" rewritten entirely for new version of
"coefoz_LMDZ.nc".
Target "obj_etat0_lim" moved from "GNUmakefile" to "nag_rules.mk".
Added some "intent" attributes in "calfis", "clmain", "clqh",
"cltrac", "cltracrn", "cvltr", "ini_undefSTD", "moy_undefSTD",
"nflxtr", "phystokenc", "phytrac", "readsulfate", "readsulfate_preind"
and "undefSTD".
In "dynetat0", "dynredem0" and "gcm", "phis" has rank 2 instead of
1. "phis" has assumed shape in "dynredem0".
Added module containing "dynredem0". Changed some calls with NetCDF
Fortran 77 interface to calls with NetCDF95 interface.
Replaced calls to "ssum" by calls to "sum" in "inigeom".
In "make.sh", new option "-c" to change compiler.
In "aaam_bud", argument "rjour" deleted.
In "physiq": renamed some variables; deleted variable "xjour".
In "phytrac": renamed some variables; new argument "lmt_pas".
Revision
5 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Mar 3 16:32:04 2008 UTC
(16 years, 5 months ago)
by
guez
Original Path:
trunk/libf/GNUmakefile
File length: 6203 byte(s)
Diff to
previous 4
,
to
selected 34
Created module from included file parafilt.
Converted caldyn0 to free format.
Added a rule to create cross-references with NAG.
Added optional attribute in iniadvtrac.
Suppressed argument nq in dynredem0 and dynredem1, using nqmx instead.
Replaced some NetCDF calls by netcdf95 calls in dynredem0.
Added intent attribute in dynredem0 and dynredem1.
Annotated use statements with only clause, in dynredem1.
Suppressed variable nq and argument of iniadvtrac in etat0.
Added test on nqmx in etat0.
This form allows you to request diffs between any two revisions of this file.
For each of the two "sides" of the diff,
enter a numeric revision.