Log of /trunk/Compilation/common_sources
Parent Directory
| Revision Log
Revision
93 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Tue Apr 1 15:50:48 2014 UTC
(10 years, 3 months ago)
by
guez
Original Path:
trunk/common_sources
File length: 637 byte(s)
Diff to
previous 92
,
to
selected 79
Moved variable calendar_used, un_an and mon_len from module calendar
to module ioconf_calendar_m. Removed unused variables cal, start_day,
start_sec of module calendar.
Inlined procedure ju2ymds_internal into procedure ju2ymds. Inlined
procedure ymds2ju_internal into procedure ymds2ju.
Removed generic interface ioget_calendar. Merged ioget_calendar_real1
and ioget_calendar_real2 into ioget_calendar_real.
Revision
81 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Mar 5 14:38:41 2014 UTC
(10 years, 4 months ago)
by
guez
Original Path:
trunk/common_sources
File length: 713 byte(s)
Diff to
previous 79
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)
-
[selected]
Modified
Fri Feb 28 17:52:47 2014 UTC
(10 years, 4 months ago)
by
guez
Original Path:
trunk/common_sources
File length: 689 byte(s)
Diff to
previous 78
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, 5 months ago)
by
guez
Original Path:
trunk/common_sources
File length: 712 byte(s)
Diff to
previous 76
,
to
selected 79
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
71 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Mon Jul 8 18:12:18 2013 UTC
(11 years ago)
by
guez
Original Path:
trunk/libf/common_sources
File length: 936 byte(s)
Diff to
previous 70
,
to
selected 79
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]
Added
Mon Jun 24 15:39:52 2013 UTC
(11 years ago)
by
guez
Original Path:
trunk/libf/common_sources
File length: 988 byte(s)
Diff
to
selected 79
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.
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.