Changeset 3965 for trunk/LMDZ.PLUTO/libf/muphypluto

Timestamp:

Nov 20, 2025, 2:13:31 PM (5 weeks ago)

Author:

debatzbr

Message:

Pluto PCM: add tendency of condensation heating rate (latent heat).
BBR

File:

• trunk/LMDZ.PLUTO/libf/muphypluto/mp2m_microphysics.F90 (modified) (1 diff)

trunk/LMDZ.PLUTO/libf/muphypluto/mp2m_microphysics.F90

@@ -120 +120 @@
                 dmugases(:,i) = dmugases(mm_nla:1:-1,i)
 
-                ! Compute condensation heating rate
-                dtlc(:) = dtlc(:) + (dmugases(:,i) * mm_xESPS(i)%fmol2fmas * mm_LheatX(mm_temp,mm_xESPS(i)))
+                ! Compute condensation heating rate (/!\ dmugases = - dm3ices)
+                dtlc(:) = dtlc(:) - (dmugases(:,i) * mm_xESPS(i)%fmol2fmas * mm_LheatX(mm_temp,mm_xESPS(i)))
             enddo