Changeset 2584 for LMDZ5/trunk


Ignore:
Timestamp:
Jul 1, 2016, 2:43:35 PM (8 years ago)
Author:
Ehouarn Millour
Message:

OpenMP bug: lread_inca should be initialized for all threads.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/dyn3dmem/dynredem_loc.F90

    r2299 r2584  
    235235
    236236!--- Tracers in file "start_trac.nc" (added by Anne)
     237  lread_inca=.FALSE.
    237238!$OMP MASTER
    238   lread_inca=.FALSE.; fil="start_trac.nc"
     239  fil="start_trac.nc"
    239240  IF(type_trac=='inca') INQUIRE(FILE=fil,EXIST=lread_inca)
    240241  IF(lread_inca) CALL err(NF90_OPEN(fil,NF90_NOWRITE,nid_trac),"open")
Note: See TracChangeset for help on using the changeset viewer.