source: LMDZ4/branches/IPSL-CM4_IPCC_patches/libf/phylmd/dimphy.h @ 782

Last change on this file since 782 was 524, checked in by lmdzadmin, 20 years ago

Initial revision

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 509 bytes
Line 
1!
2! $Header$
3!
4c-----------------------------------------------------------------------
5      INTEGER KIDIA, KFDIA, KLON, KLEV
6      PARAMETER (KIDIA=1,KFDIA=iim*(jjm-1)+2-1/jjm,
7     .           KLON=KFDIA-KIDIA+1,KLEV=llm)
8c-----------------------------------------------------------------------
9      INTEGER nbtr ! nombre de vrais traceurs
10      PARAMETER (nbtr=nqmx-2+1/(nqmx-1))
11c-----------------------------------------------------------------------
12      REAL zmasq(KLON)
13      COMMON/terreoce/zmasq
Note: See TracBrowser for help on using the repository browser.