Changeset 3072 for trunk/LMDZ.COMMON/libf

Timestamp:

Oct 5, 2023, 11:58:22 AM (21 months ago)

Author:

jbclement

Message:

Mars PCM:
Correction of a bug introduced in commit r3069 when compiling with ifort.
JBC

File:

• trunk/LMDZ.COMMON/libf/evolution/pem.F90 (modified) (1 diff)

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

@@ -72 +72 @@
     use mod_phys_lmdz_para, only: is_parallel, is_sequential, is_mpi_root, is_omp_root, is_master
     use planete_h,          only: aphelie, periheli, year_day, peri_day, obliquit
-    use comcstfi_h,         only: r, mugaz, g
+    use comcstfi_h,         only: r, mugaz
     use paleoclimate_mod,   only: albedo_perenialco2
 #else