Changeset 3302 for trunk/LMDZ.MARS/libf/dynphy_lonlat/phymars

Timestamp:

Apr 15, 2024, 6:10:08 PM (8 months ago)

Author:

jbclement

Message:

Mars PCM:
Correction related to r3301: the variable 'resol' was not linked to longitude resolution.
JBC

File:

• trunk/LMDZ.MARS/libf/dynphy_lonlat/phymars/subslope_mola.F90 (modified) (1 diff)

trunk/LMDZ.MARS/libf/dynphy_lonlat/phymars/subslope_mola.F90

@@ -19 +19 @@
 
       double precision :: resol
-      parameter(resol = real(iim))
+      parameter(resol = 64)
       integer :: jjm_mola, iim_mola 
       parameter(jjm_mola=180*resol, iim_mola=2*jjm_mola)