Ignore:
Timestamp:
Feb 17, 2026, 2:45:53 PM (11 days ago)
Author:
jbclement
Message:

PEM:

  • Correct management of H2O ice tendency in 1D when there is not enough ice anymore.
  • Clean initialization of allocatable module arrays (especially needed when no slope)
  • One more renaming for consistency + few small updates thoughout the code.

JBC

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.COMMON/libf/evolution/surface.F90

    r4065 r4074  
    6060if (.not. allocated(albedodat_PCM)) allocate(albedodat_PCM(ngrid))
    6161if (.not. allocated(emissivity_PCM)) allocate(emissivity_PCM(ngrid,nslope))
     62albedo_PCM(:,:) = 0._dp
     63albedodat_PCM(:) = 0._dp
     64emissivity_PCM(:,:) = 1._dp
    6265
    6366END SUBROUTINE ini_surface
Note: See TracChangeset for help on using the changeset viewer.