source: LMDZ5/branches/LMDZ5-dev032011/libf/dyn3dpar/logic.h @ 5080

Last change on this file since 5080 was 1492, checked in by Laurent Fairhead, 14 years ago

Merge of development branch LMDZ5V2.0-dev r1455:r1491 into the trunk.
Validation made locally: restart files are strictly equal between the HEAD of the trunk
and r1491 of LMDZ5V2.0-dev


Synchro de la branche de développement LMDZ5V2.0-dev r1455:r1491 et de la trunk
Validation faite en local: les fichiers restart sont équivalents entre la HEAD de la trunk
et la révision r1491 de LMDZ5V2.0-dev

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 774 bytes
Line 
1!
2! $Id: logic.h 1492 2011-03-08 08:10:25Z abarral $
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     &  ,ok_limit,ok_etat0,grilles_gcm_netcdf
13
14      LOGICAL purmats,forward,leapf,apphys,statcl,conser,               &
15     & apdiss,apdelq,saison,ecripar,fxyhypb,ysinus                      &
16     &  ,read_start,ok_guide,ok_strato,ok_gradsfile                     &
17     &  ,ok_limit,ok_etat0,grilles_gcm_netcdf
18
19      INTEGER iflag_phys
20!$OMP THREADPRIVATE(/logic/)
21!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.