Log of /trunk/phylmd/Interface_surf/cdrag.f
Parent Directory
| Revision Log
Revision
292 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Jul 25 14:25:28 2018 UTC
(5 years, 11 months ago)
by
guez
File length: 4255 byte(s)
Diff to
previous 291
,
to
selected 274
In procedure cdrag test zri >= 0 rather than zri > 0 and invert the
order of the if construction (following LMDZ).
Revision
291 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Jul 25 14:15:44 2018 UTC
(5 years, 11 months ago)
by
guez
File length: 4073 byte(s)
Diff to
previous 286
,
to
selected 274
Use named constant f_ri_cd_min in procedure cdrag (following LMDZ).
Remove some intermediary variables.
Revision
274 -
(
view)
(
annotate)
-
[selected]
Modified
Wed Jul 11 16:50:27 2018 UTC
(6 years ago)
by
guez
Original Path:
trunk/phylmd/clcdrag.f
File length: 3741 byte(s)
Diff to
previous 272
Merge clcdrag and coefcdrag (following LMDZ revision 2232). Replace
local arrays by scalars. max(qsurf, 0), f_cdrag_ter, f_cdrag_oce in
clcdrag. max(cepdu2, speed(i)**2) in coefcdrag, test zri > 0 instead
of >= 0. trm1 was unused in coefcdrag. No need for intermediary local
variable pref_local.
Revision
272 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Wed Jul 11 14:51:28 2018 UTC
(6 years ago)
by
guez
Original Path:
trunk/phylmd/clcdrag.f
File length: 3409 byte(s)
Diff to
previous 271
,
to
selected 274
Add arguments psol and pref to clcdrag, in preparation of merge with
coefcdrag. Remove intent out arguments cdran and zri1 of coefcdrag,
not used. Make argument pref of coefcdrag optional, in preparation of
merge with clcdrag. Remove useless intermediary local variable zdphi
in coefcdrag. Remove unused local variable ri1 in stdlevvar.
Revision
221 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Apr 20 14:44:47 2017 UTC
(7 years, 2 months ago)
by
guez
Original Path:
trunk/Sources/phylmd/clcdrag.f
File length: 3051 byte(s)
Diff to
previous 134
,
to
selected 274
clcdrag is no longer used in LMDZ. Replaced by cdrag in LMDZ. In cdrag
in LMDZ, zxli is a symbolic constant, false. So removed case zxli true
in LMDZE.
read_sst is called zero (if no ocean point on the whole planet) time or
once per call of physiq. If mod(itap - 1, lmt_pas) == 0 then we have
advanced in time of lmt_pas and deja_lu is necessarily false.
qsat[sl] and dqsat[sl] were never called.
Added output of qsurf in histins, following LMDZ.
Last dummy argument dtime of phystokenc is always the same as first
dummy argument pdtphys, removed dtime.
Removed make rules for nag_xref95, since it does not exist any longer.
Revision
62 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Jul 26 14:37:37 2012 UTC
(11 years, 11 months ago)
by
guez
Original Path:
trunk/libf/phylmd/clcdrag.f90
File length: 4255 byte(s)
Diff to
previous 47
,
to
selected 274
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
38 -
(
view)
(
annotate)
-
[select for diffs]
Modified
Thu Jan 6 17:52:19 2011 UTC
(13 years, 6 months ago)
by
guez
Original Path:
trunk/libf/phylmd/clcdrag.f90
File length: 4333 byte(s)
Diff to
previous 3
,
to
selected 274
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".
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.