Log of /trunk/dyn3d/Dissipation
Directory Listing
Revision
254 -
Directory Listing
Modified
Mon Feb 5 10:39:38 2018 UTC
(6 years, 3 months ago)
by
guez
Move Sources/* to root directory.
Revision
178 -
Directory Listing
Modified
Fri Mar 11 18:47:26 2016 UTC
(8 years, 2 months ago)
by
guez
Original Path:
trunk/Sources/dyn3d/Dissipation
Moved variables date0, deltat, datasz_max, ncvar_ids, point, buff_pos,
buffer, regular from module histcom_var to modules where they are
defined.
Removed procedure ioipslmpp, useless for a sequential program.
Added argument datasz_max to histwrite_real (to avoid circular
dependency with histwrite).
Removed useless variables and computations everywhere.
Changed real litteral constants from default kind to double precision
in lwb, lwu, lwvn, sw1s, swtt, swtt1, swu.
Removed unused arguments: paer of sw, sw1s, sw2s, swclr; pcldsw of
sw1s, sw2s; pdsig, prayl of swr; co2_ppm of clmain, clqh; tsol of
transp_lay; nsrf of screenp; kcrit and kknu of gwstress; pstd of
orosetup.
Added output of relative humidity.
Revision
137 -
Directory Listing
Modified
Wed May 6 15:51:03 2015 UTC
(9 years ago)
by
guez
Original Path:
trunk/Sources/dyn3d/Dissipation
Removed unused argument missval in ma_fucoll_r[1-3]1, ma_fufill_r[1-3]1.
Split filtreg into two procedures: filtreg_scal and filtreg_v. I did
not like the test on the extent of the argument and there was no
common code between the two cases: jjm and jjm + 1. Also, it is
simpler now to just remove the argument "direct" from filtreg_v instead
of allowing it and then stopping the program if it is false.
Removed the computation of pkf in reanalyse2nat, was not used.
As a consequence of the split of filtreg, had to extract the
computation of pkf out of exner_hyb. This is clearer anyway because we
want to be able to call exner_hyb with any size in the first two
dimensions (as in test_disvert). But at the same time exner_hyb
required particular sizes for the computation of pkf. It was
awkward. The only computation of pkf is now in leapfrog.
Revision
107 -
Directory Listing
Modified
Thu Sep 11 15:09:15 2014 UTC
(9 years, 8 months ago)
by
guez
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
103 -
Directory Listing
Modified
Fri Aug 29 13:00:05 2014 UTC
(9 years, 8 months ago)
by
guez
Renamed module cvparam to cv_param. Deleted procedure
cv_param. Changed variables of module cv_param into parameters.
In procedures cv_driver, cv_uncompress and cv3_uncompress, removed
some arguments giving dimensions and used module variables klon and
klev instead.
In procedures gradiv2, laplacien_gam and laplacien, changed
declarations of local variables because klevel is not always klev.
Removed code for nudging surface pressure.
Removed arguments pim and pjm of tau2alpha. Added assignment of false
to variable first.
Replaced real argument del of procedures foeew and FOEDE by logical
argument.
Revision
82 -
Directory Listing
Modified
Wed Mar 5 14:57:53 2014 UTC
(10 years, 2 months ago)
by
guez
Changed all ".f90" suffixes to ".f".
Revision
76 -
Directory Listing
Modified
Fri Nov 15 18:45:49 2013 UTC
(10 years, 6 months ago)
by
guez
Moved everything out of libf.
Revision
71 -
Directory Listing
Modified
Mon Jul 8 18:12:18 2013 UTC
(10 years, 10 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
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
66 -
Directory Listing
Modified
Thu Sep 20 13:00:41 2012 UTC
(11 years, 7 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
Changed name of module "comvert" to "disvert_m". Changed constant
1. to 0.3 in vertical sampling "strato".
Revision
65 -
Directory Listing
Modified
Thu Sep 20 09:57:03 2012 UTC
(11 years, 7 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
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 -
Directory Listing
Modified
Wed Aug 29 14:47:17 2012 UTC
(11 years, 8 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
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
61 -
Directory Listing
Modified
Fri Apr 20 14:58:43 2012 UTC
(12 years ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
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, 3 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
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, 4 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
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 -
Directory Listing
Added
Mon Dec 12 13:25:01 2011 UTC
(12 years, 5 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Dissipation
-- 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.
