Ignore:
Timestamp:
Aug 19, 2015, 2:56:45 PM (9 years ago)
Author:
musat
Message:

Bug fix : Add !$OMP THREADPRIVATE for
zustr_gwd_hines, zvstr_gwd_hines
zustr_gwd_front, zvstr_gwd_front
IM

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r2333 r2341  
    6262  REAL, allocatable:: zustr_gwd_front(:), zvstr_gwd_front(:) ! (klon)
    6363  REAL, allocatable:: zustr_gwd_rando(:), zvstr_gwd_rando(:) ! (klon)
     64  !$OMP THREADPRIVATE(zustr_gwd_hines, zvstr_gwd_hines)
     65  !$OMP THREADPRIVATE(zustr_gwd_front, zvstr_gwd_front)
    6466  !$OMP THREADPRIVATE(zustr_gwd_rando, zvstr_gwd_rando)
    6567
Note: See TracChangeset for help on using the changeset viewer.