source: LMDZ4/branches/unlabeled-1.1.1/libf/phylmd/param_cou.h @ 2459

Last change on this file since 2459 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: 676 bytes
Line 
1!
2! $Header$
3!
4! $Id: param_cou.h 524 2004-05-19 12:53:04Z jyg $
5!
6! -- param_cou.h
7!
8        INTEGER jpmaxfld
9        PARAMETER(jpmaxfld = 40)        ! Maximum number of fields exchanged
10                                        ! between ocean and atmosphere
11        INTEGER jpflda2o1
12        PARAMETER(jpflda2o1 = 12)         ! Number of fields exchanged from
13                                         ! atmosphere to ocean via flx.F
14        INTEGER jpflda2o2
15        PARAMETER(jpflda2o2 = 6)         ! Number of fields exchanged from
16                                         ! atmosphere to ocean via tau.F
17!
18        INTEGER jpfldo2a
19        PARAMETER(jpfldo2a = 4)          ! Number of fields exchanged from
20                                         ! ocean to atmosphere
21!
Note: See TracBrowser for help on using the repository browser.