Changeset 2721 for trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90

Timestamp:

Jun 21, 2022, 11:05:45 AM (2 years ago)

Author:

aslmd

Message:

new routine generic_rain integrated in physiq_mod

File:

• trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90 (modified) (1 diff)

trunk/LMDZ.GENERIC/libf/phystd/inifis_mod.F90

@@ -929 +929 @@
      call getin_p("generic_condensation",generic_condensation)
      if (is_master) write(*,*)trim(rname)//": generic_condensation = ",generic_condensation
+     
+     if (is_master) write(*,*)trim(rname)//": Generic Condensation of tracers ?"
+     generic_rain=.false. !default value 
+     call getin_p("generic_rain",generic_rain)
+     if (is_master) write(*,*)trim(rname)//": generic_rain = ",generic_rain
+
      if (is_master) write(*,*)trim(rname)//": Compute water cycle ?"
      water=.false. ! default value