Changeset 3152 for trunk/LMDZ.COMMON/libf/evolution

Timestamp:

Dec 8, 2023, 11:39:04 AM (12 months ago)

Author:

jbclement

Message:

PEM:

• The PEM deftank folder is now in LMDZ.COMMON/libf/evolution/ (not anymore in the Mars PCM deftank).
• Small corrections related to r3149.

JBC

Location:

trunk/LMDZ.COMMON/libf/evolution

Files:

• changelog.txt (modified) (1 diff)
• deftank (moved) (moved from trunk/LMDZ.MARS/deftank/pem)
• deftank/README (modified) (1 diff)
• evol_ice_mod.F90 (modified) (1 diff)
• read_data_PCM_mod.F90 (modified) (1 diff)

trunk/LMDZ.COMMON/libf/evolution/changelog.txt

@@ -168 +168 @@
 - Some cleanings throughout the code;
 - Small updates in files of the deftank.
+
+== 08/12/2023 == JBC
+- The PEM deftank folder is now in LMDZ.COMMON/libf/evolution/ (not anymore in the Mars PCM deftank).
+- Small corrections related to r3149.

trunk/LMDZ.COMMON/libf/evolution/deftank/README

@@ -28 +28 @@
 Note:
   To run the chained simulation, be careful to have:
-      (i)   the xml files for XIOS. There should be "iodef.xml", "context_lmdz_physics.xml", "file_def_physics_mars.xml" and "field_def_physics_mars.xml" which can be found in the deftank folder. In "context_lmdz_physics.xml", the line for Xdiurnalave should be activated (enabled=".true.");
+      (i)   the xml files for XIOS. There should be "iodef.xml", "context_lmdz_physics.xml", "file_def_physics_mars.xml" and "field_def_physics_mars.xml" which can be found in the planetary deftank folder. In "context_lmdz_physics.xml", the line for Xdiurnalave should be activated (enabled=".true.");
       (ii)  the usual def files to run the PCM. "run.def" should be renamed in "run_PCM.def";
       (iii  the starting files ("startfi.nc" and "start.nc"). The former can be modified by "modify_startfi_orbit.sh";

trunk/LMDZ.COMMON/libf/evolution/evol_ice_mod.F90

@@ -47 +47 @@
 use time_evol_mod,          only: dt_pem
 use comslope_mod,           only: subslope_dist, def_slope_mean
-use criterion_pem_stop_mod, only: criterion_waterice_stop
 
 #ifndef CPP_STD

trunk/LMDZ.COMMON/libf/evolution/read_data_PCM_mod.F90

@@ -118 +118 @@
         write(*,*) "Data for soiltemp downloaded!"
 
-        call get_var4("Waterdensity_soil",watersoil_density_dyn(:,:,:,1,:))
+        call get_var4("waterdensity_soil",watersoil_density_dyn(:,:,:,1,:))
         write(*,*) "Data for waterdensity_soil downloaded!"
 
-        call get_var3("Waterdensity_surface",watersurf_density_dyn(:,:,1,:))
+        call get_var3("waterdensity_surface",watersurf_density_dyn(:,:,1,:))
         write(*,*) "Data for waterdensity_surface downloaded!"
     endif !soil_pem