Log of /trunk/dyn3d/Read_reanalyse/reanalyse2nat.f
Parent Directory
| Revision Log
Revision
91 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Mar 26 17:18:58 2014 UTC
(10 years, 3 months ago)
by
guez
File length: 3360 byte(s)
Diff to
previous 88
,
to
selected 85
Removed unused variables lock_startdate and time_stamp of module
calendar.
Noticed that physiq does not change the surface pressure. So removed
arguments ps and dpfi of subroutine addfi. dpfi was always 0. The
computation of ps in addfi included some averaging at the poles. In
principle, this does not change ps but in practice it does because of
finite numerical precision. So the results of the simulation are
changed. Removed arguments ps and dpfi of calfis. Removed argument
d_ps of physiq.
du at the poles is not computed by dudv1, so declare only the
corresponding latitudes in dudv1. caldyn passes only a section of the
array dudyn as argument.
Removed variable niadv of module iniadvtrac_m.
Declared arguments of exner_hyb as assumed-shape arrays and made all
other horizontal sizes in exner_hyb dynamic. This allows the external
program test_disvert to use exner_hyb at a single horizontal position.
Revision
88 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Mar 11 15:09:02 2014 UTC
(10 years, 4 months ago)
by
guez
File length: 3327 byte(s)
Diff to
previous 85
Removed useless argument mode of subroutine read_reanalyse.
Revision
85 -
(
view)
(
annotate)
-
[selected]
Modified
Thu Mar 6 17:35:22 2014 UTC
(10 years, 4 months ago)
by
guez
File length: 3210 byte(s)
Diff to
previous 83
Removed option to guide surface pressure because it was not
functional: psrea1 was not defined in procedure guide. Removed local
variables psrea1 and psrea2 of procedure guide. ps becomes an
"intent(in)" argument in guide. Removed case guide_p in guide. Removed
variable guide_p of module conf_guide_m. Removed case guide_p and
argument ps in read_reanalyse. Removed case guide_p and argument ps in
reanalyse2nat.
Revision
83 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Mar 6 15:12:00 2014 UTC
(10 years, 4 months ago)
by
guez
File length: 3595 byte(s)
Diff to
previous 82
,
to
selected 85
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
44 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Apr 13 12:29:18 2011 UTC
(13 years, 3 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Read_reanalyse/reanalyse2nat.f90
File length: 4036 byte(s)
Diff to
previous 37
,
to
selected 85
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
37 -
(
view)
(
annotate)
-
[select for diffs]
Added
Tue Dec 21 15:45:48 2010 UTC
(13 years, 6 months ago)
by
guez
Original Path:
trunk/libf/dyn3d/Read_reanalyse/reanalyse2nat.f90
File length: 4031 byte(s)
Diff
to
selected 85
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".
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.