Ignore:
Timestamp:
Jun 13, 2025, 7:41:53 PM (6 weeks ago)
Author:
yann meurdesoif
Message:

Convection GPU porting : replace saved variables by PARAMETER when possible
YM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/cv3p_mixing.f90

    r5692 r5695  
    8282  INTEGER nstep
    8383
    84   INTEGER,SAVE                                       :: igout=1
    85 !$OMP THREADPRIVATE(igout)
     84  INTEGER,PARAMETER                                       :: igout=1
    8685
    8786! --   Mixing probability distribution functions
Note: See TracChangeset for help on using the changeset viewer.