Changeset 2891 for LMDZ5/trunk/libf


Ignore:
Timestamp:
May 24, 2017, 2:39:11 PM (7 years ago)
Author:
Laurent Fairhead
Message:

Variable need not be SAVE. Corrects a non reproductibility issue

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/yamada4.F90

    r2828 r2891  
    143143  INTEGER, SAVE :: yamada4_num
    144144  !$OMP THREADPRIVATE(new_yamada4,yamada4_num)
    145   REAL, SAVE :: yun,ydeux,disseff
     145  REAL, SAVE :: yun,ydeux
     146  REAL :: disseff
    146147  !$OMP THREADPRIVATE(yun,ydeux)
    147148  REAL frif, falpha, fsm
Note: See TracChangeset for help on using the changeset viewer.