Ignore:
Timestamp:
Nov 21, 2023, 12:23:51 PM (11 months ago)
Author:
yjaziri
Message:

PCM Generic:

correction to commit 3131

YJ

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/aeronostd/photolysis_online.F

    r3131 r3133  
    11721172
    11731173      use chimiedata_h,  only: albedo_snow_chim, albedo_co2_ice_chim
    1174       use slab_ice_h,    only: h_alb_ice,
    1175      &                         alb_ice_min, alb_ice_max
     1174!      use slab_ice_h,    only: h_alb_ice, alb_ice_min, alb_ice_max
     1175      use ocean_slab_mod, only: h_alb_ice
     1176      use ocean_slab_mod, only: alb_ice_min
     1177      use ocean_slab_mod, only: alb_ice_max
    11761178      use tracer_h,      only: igcm_h2o_ice, igcm_co2_ice
    11771179      use callkeys_mod,  only: ok_slab_ocean, co2cond, alb_ocean,
Note: See TracChangeset for help on using the changeset viewer.