source: LMDZ6/trunk/libf/phylmd/compbl_mod_h.f90 @ 5687

Last change on this file since 5687 was 5627, checked in by amaison, 2 months ago

Representation of heterogeneous continental subsurfaces with parameter or flux aggregation in the simplified surface model (bucket) for 1D case studies.

  • 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
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 617 bytes
Line 
1! Replaces compbl.h
2
3MODULE compbl_mod_h
4  IMPLICIT NONE; PRIVATE
5  PUBLIC iflag_pbl, iflag_pbl_split, iflag_order2_sollw, ifl_pbltree, iflag_hetero_surf
6
7  !!      integer iflag_pbl,iflag_pbl_split
8  !!      common/compbl/iflag_pbl,iflag_pbl_split
9  !!FC      integer iflag_pbl, iflag_pbl_split, iflag_order2_sollw
10  !FC      common/compbl/iflag_pbl, iflag_pbl_split, iflag_order2_sollw
11  INTEGER iflag_pbl, iflag_pbl_split, iflag_order2_sollw, ifl_pbltree, iflag_hetero_surf
12  !$OMP THREADPRIVATE(iflag_pbl, iflag_pbl_split, iflag_order2_sollw, ifl_pbltree, iflag_hetero_surf)
13
14  !>jyg+al1
15
16END MODULE compbl_mod_h
Note: See TracBrowser for help on using the repository browser.