source: LMDZ6/branches/Ocean_skin/libf/phylmd/flux_arp.h @ 3627

Last change on this file since 3627 was 2329, checked in by Laurent Fairhead, 9 years ago

Needed here finally

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
File size: 317 bytes
Line 
1!
2! $Id: flux_arp.h 2010-08-04 17:02:56Z lahellec $
3!
4      logical :: ok_flux_surf
5      logical :: ok_prescr_ust !for prescribed ustar
6      real :: fsens
7      real :: flat
8      real :: ust
9      real :: tg
10
11      common /flux_arp/fsens,flat,ust,tg,ok_flux_surf,ok_prescr_ust
12
13!$OMP THREADPRIVATE(/flux_arp/)
14
15
16
17
Note: See TracBrowser for help on using the repository browser.