Ignore:
Timestamp:
Sep 10, 2024, 3:06:08 PM (10 days ago)
Author:
abarral
Message:

Replace IOPHYS_WK CPP key by logical.
jyg & amaury

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r4908 r5181  
    8181  !$OMP THREADPRIVATE(wk_int_delta_t_min)
    8282
     83! CPP key used only in this module for debugging purposes. jyg 09/24
     84!!#define IOPHYS_WK
     85#ifdef IOPHYS_WK
     86  LOGICAL, PARAMETER :: CPPKEY_IOPHYS_WK = .TRUE.
     87#else
     88  LOGICAL, PARAMETER :: CPPKEY_IOPHYS_WK = .FALSE.
     89#endif
     90
    8391
    8492
Note: See TracChangeset for help on using the changeset viewer.