Ignore:
Timestamp:
Nov 5, 2018, 3:24:59 PM (6 years ago)
Author:
Laurent Fairhead
Message:

Undoing merge with trunk (r3356) to properly register Yann's latest modifications

Location:
LMDZ6/branches/DYNAMICO-conv
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/branches/DYNAMICO-conv

  • LMDZ6/branches/DYNAMICO-conv/libf/phylmd/thermcell_flux2.F90

    • Property svn:executable set to *
    r3356 r3411  
    4747      REAL f_old,ddd0,eee0,ddd,eee,zzz
    4848
    49       REAL,SAVE :: fomass_max=0.5
    50       REAL,SAVE :: alphamax=0.7
    51 !$OMP THREADPRIVATE(fomass_max,alphamax)
     49      REAL fomass_max,alphamax
     50      save fomass_max,alphamax
    5251
    5352      logical check_debug,labort_physic
    … …  
    5655      character (len=80) :: abort_message
    5756
     57      fomass_max=0.5
     58      alphamax=0.7
    5859
    5960      ncorecfm1=0
Note: See TracChangeset for help on using the changeset viewer.