Ignore:
Timestamp:
Oct 29, 2021, 1:00:06 PM (3 years ago)
Author:
romain.vande
Message:

First stage of implementing Open_MP in the physic.
So far it can initialyse physic and run with all routines at .FALSE.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/turb_mod.F90

    r1770 r2578  
    1313      ! this is a flag to say 'turbulence is resolved'
    1414      ! mostly for LES use. default is FALSE (for GCM and mesoscale)
     15
     16!$OMP THREADPRIVATE(q2, l0,ustar,wstar,tstar,hfmax_th,zmax_th,     &
     17!$OMP                sensibFlux)
    1518
    1619contains
Note: See TracChangeset for help on using the changeset viewer.