/[lmdze]/trunk/libf/dyn3d/temps.f90
ViewVC logotype

Annotation of /trunk/libf/dyn3d/temps.f90

Parent Directory Parent Directory | Revision Log Revision Log


Revision 27 - (hide annotations)
Thu Mar 25 14:29:07 2010 UTC (14 years, 2 months ago) by guez
File size: 126 byte(s)
"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".

1 guez 3 module temps
2    
3     implicit none
4    
5     INTEGER itau_dyn, itau_phy
6 guez 25 INTEGER day_end, annee_ref, day_ref
7 guez 3 REAL dt
8    
9     end module temps

  ViewVC Help
Powered by ViewVC 1.1.21