Changeset 5370 for LMDZ6/trunk/libf


Ignore:
Timestamp:
Dec 3, 2024, 4:20:24 PM (12 days ago)
Author:
lebasn
Message:

StratAer? bugfix: import klon from dimphy that wasn't defined.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/StratAer/strataer_emiss_mod.f90

    r5367 r5370  
    1010    USE print_control_mod, ONLY: lunout
    1111    USE mod_phys_lmdz_para, ONLY : is_master
    12 
     12    USE dimphy, ONLY: klon
     13   
    1314    ! Local variables
    1415    INTEGER                  :: ispec
    15     INTEGER :: klon  ! Amaury 12/24: cette déclaration était avant implicite (depuis longtemps !), mais c'est probablement un bug !? On devrait avoir `USE dimphy, ONLY: klon`. A corriger ultérieurement.. ?
    16 
     16   
    1717    WRITE(lunout,*) 'IN STRATAER_EMISS INIT WELCOME!'
    1818
Note: See TracChangeset for help on using the changeset viewer.