Changeset 1920

Timestamp:

Apr 17, 2018, 10:43:23 AM (7 years ago)

Author:

mvals

Message:

Mars GCM:
1D code cleanup:

• in testphys1d.F variable cell_area is intialized to 1 before being called

MV

Location:

trunk/LMDZ.MARS

Files:

• README (modified) (1 diff)
• libf/phymars/dyn1d/testphys1d.F (modified) (2 diffs)

trunk/LMDZ.MARS/README

@@ -2565 +2565 @@
 1D code cleanup:
 - in testphys1d.F variable totcloudfrac is directly called from dimradmars_mod (which notably prevents from errors when tracer=F)
+
+== 17/04/2018 == MV
+1D code cleanup:
+- in testphys1d.F variable cell_area is intialized to 1 before being called

trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F

@@ -168 +168 @@
       dtemisice(2) = 2.          ! time scale for snow metamorphism (south
 
-
+c     mesh surface (not a very usefull quantity in 1D)
+c     ----------------------------------------------------
+      cell_area(1)=1.E+0
+      
 c ------------------------------------------------------
 c  Loading run parameters from "run.def" file
@@ -553 +556 @@
 c   Specific initializations for "physiq"
 c   -------------------------------------
-c   mesh surface (not a very usefull quantity in 1D)
-      cell_area(1)=1.E+0
-
 c   surface geopotential is not used (or useful) since in 1D
 c   everything is controled by surface pressure