Changeset 2218 for trunk/LMDZ.MARS/libf/phymars/conf_phys.F

Timestamp:

Jan 16, 2020, 10:44:19 AM (5 years ago)

Author:

emillour

Message:

Mars GCM:
Change "latentheat" flag to a more descriptive "latentheat_surfwater" and
set its default value to .true.
EM

File:

• trunk/LMDZ.MARS/libf/phymars/conf_phys.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/conf_phys.F

@@ -307 +307 @@
          write(*,*)"latent heat release during sublimation", 
      &              " /condensation of ground water ice"
-         latentheat=.false. ! default value
-         call getin("latentheat",latentheat)
-         write(*,*)" latentheat = ",latentheat
+         latentheat_surfwater=.true. ! default value
+         call getin("latentheat_surfwater",latentheat_surfwater)
+         write(*,*)" latentheat_surfwater = ",latentheat_surfwater
 
          write(*,*)"rad.transfer is computed every iradia",