source: LMDZ4/trunk/libf/dyn3dpar/logic.h @ 1076

Last change on this file since 1076 was 1046, checked in by lmdzadmin, 16 years ago

Modifs guidage pour utiliser des champs de guidage sur niveaux hybrides
Ajout cle logique ok_gradsfile (.false. par defaut) pour activer sorties grads du guidage
FC/IM

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 642 bytes
Line 
1!
2! $Header$
3!
4!
5!
6!-----------------------------------------------------------------------
7! INCLUDE 'logic.h'
8
9      COMMON/logic/ purmats,iflag_phys,forward,leapf,apphys,            &
10     &  statcl,conser,apdiss,apdelq,saison,ecripar,fxyhypb,ysinus       &
11     &  ,read_start,ok_guide,ok_strato,ok_gradsfile
12
13      LOGICAL purmats,forward,leapf,apphys,statcl,conser,               &
14     & apdiss,apdelq,saison,ecripar,fxyhypb,ysinus                      &
15     &  ,read_start,ok_guide,ok_strato,ok_gradsfile
16
17      INTEGER iflag_phys
18!$OMP THREADPRIVATE(/logic/)
19!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.