Ignore:
Timestamp:
Aug 23, 2013, 2:20:58 PM (11 years ago)
Author:
yann meurdesoif
Message:

Solve performance problem comming from declarations of a derived type.

YM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/dyn3dmem/advtrac_loc.F

    r1823 r1848  
    7979      DATA dum/.true./
    8080      integer ijb,ije,ijbu,ijbv,ijeu,ijev,j
    81       type(Request) :: testRequest
     81      type(Request),SAVE :: testRequest
     82!$OMP THREADPRIVATE(testRequest)
    8283
    8384c  test sur l'eventuelle creation de valeurs negatives de la masse
Note: See TracChangeset for help on using the changeset viewer.