Ignore:
Timestamp:
Jul 30, 2008, 5:57:45 PM (16 years ago)
Author:
Laurent Fairhead
Message:

Du nettoyage sur le parallelisme, inclusion de nouvelles interfaces pour OPA9
et ORCHIDEE YM
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/phylmd/add_phys_tend.F90

    r972 r987  
    3838integer debug_level
    3939logical, save :: first=.true.
     40!$OMP THREADPRIVATE(first)
    4041INTEGER, SAVE :: itap
     42!$OMP THREADPRIVATE(itap)
    4143!======================================================================
    4244! Initialisations
Note: See TracChangeset for help on using the changeset viewer.