Ignore:
Timestamp:
Jun 30, 2023, 5:03:07 PM (11 months ago)
Author:
Laurent Fairhead
Message:

Resolve an unitialised variable issue
ACaubel

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r4590 r4596  
    13151315       irneb= strIdx(tracers(:)%name, addPhase('H2O', 'r'))
    13161316       ibs  = strIdx(tracers(:)%name, addPhase('H2O', 'b'))
    1317        CALL init_etat0_limit_unstruct
    1318        IF (.NOT. create_etat0_limit) CALL init_limit_read(days_elapsed)
     1317!       CALL init_etat0_limit_unstruct
     1318!       IF (.NOT. create_etat0_limit) CALL init_limit_read(days_elapsed)
    13191319       !CR:nvelles variables convection/poches froides
    13201320
    … …  
    13391339            read_climoz, &
    13401340            alp_offset)
     1341       CALL init_etat0_limit_unstruct
     1342       IF (.NOT. create_etat0_limit) CALL init_limit_read(days_elapsed)
    13411343       CALL phys_state_var_init(read_climoz)
    13421344       CALL phys_output_var_init
Note: See TracChangeset for help on using the changeset viewer.