Changeset 3076 for trunk/LMDZ.MARS/deftank

Timestamp:

Oct 6, 2023, 5:32:11 PM (16 months ago)

Author:

jbclement

Message:

PEM:
Big cleaning/improvements of the PEM:

• Conversion of "abort_pem.F" and "soil_settings_PEM.F" into Fortran 90;
• Transformation of every PEM subroutines into module;
• Rewriting of many subroutines with modern Fortran syntax;
• Correction of a bug in "pem.F90" when calling 'recomp_tend_co2_slope'. The arguments were given in disorder and emissivity was missing;
• Update of "launch_pem.sh" in deftank.

JBC

File:

• trunk/LMDZ.MARS/deftank/pem/launch_pem.sh (modified) (1 diff)

trunk/LMDZ.MARS/deftank/pem/launch_pem.sh

@@ -168 +168 @@
     mv startfi.nc startfi_evol.nc
     if [ -f "start.nc" ]; then
-        cp start.nc start_evol.nc
+        mv start.nc start_evol.nc
     elif [ -f "start1D.txt" ]; then
-        cp start1D.txt start1D_evol.txt
+        mv start1D.txt start1D_evol.txt
     fi
     ./$exePEM > out_runPEM${iPEM} 2>&1