Changeset 3418 for trunk/LMDZ.MARS/libf/phymars

Timestamp:

Aug 26, 2024, 1:23:08 AM (4 months ago)

Author:

llange

Message:

Mars PCM
Fixing bug: the emissivity of perenial CO2 ice was not correctly handled
LL

File:

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

trunk/LMDZ.MARS/libf/phymars/albedocaps.F90

@@ -116 +116 @@
      psolaralb(ig,1) = albedo_perennialco2
      psolaralb(ig,2) = albedo_perennialco2
+     emisref(ig)=emisice(icap)
   else if (watercaptag(ig) .and. water) then
     ! there is a water ice cap: set the surface albedo to the water ice one