source: LMDZ6/trunk/libf/phylmd/flux_arp.h @ 5041

Last change on this file since 5041 was 3780, checked in by evignon, 4 years ago

Premiere comission Etienne: changements pour le 1D (forcage en Ts au dessus des continents) et inclusion drag arbres dans yamada4_num=6
  • 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: 469 bytes
RevLine 
[1887]1!
2! $Id: flux_arp.h 2010-08-04 17:02:56Z lahellec $
[3780]3! Modif EV, 10/2020
[1887]4!
5      logical :: ok_flux_surf
[2126]6      logical :: ok_prescr_ust !for prescribed ustar
[3780]7      logical :: ok_prescr_beta
8      logical :: ok_forc_tsurf
9
10
[1887]11      real :: fsens
12      real :: flat
[3780]13      real :: betaevap
[2126]14      real :: ust
15      real :: tg
[1887]16
[3780]17      common /flux_arp/fsens,flat,ust,tg,ok_flux_surf,ok_prescr_ust,ok_prescr_beta,betaevap,ok_forc_tsurf
[1887]18
19!$OMP THREADPRIVATE(/flux_arp/)
20
21
[3780]22     
[1887]23
Note: See TracBrowser for help on using the repository browser.