source: LMDZ4/branches/LMDZ4_par_0/libf/phylmd/param_cou.h @ 3400

Last change on this file since 3400 was 633, checked in by (none), 20 years ago

This commit was manufactured by cvs2svn to create branch 'LMDZ4_par_0'.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 695 bytes
Line 
1!
2! $Header$
3!
4! $Id: param_cou.h 633 2005-05-04 15:05:57Z fairhead $
5!
6! -- param_cou.h
7!
8        INTEGER jpmaxfld
9        PARAMETER(jpmaxfld = 40)        ! Maximum number of fields exchanged
10                                        ! between ocean and atmosphere
11! -- LOOP
12        INTEGER jpflda2o1
13        PARAMETER(jpflda2o1 = 13)        ! Number of fields exchanged from
14                                         ! atmosphere to ocean via flx.F
15! -- LOOP
16        INTEGER jpflda2o2
17        PARAMETER(jpflda2o2 = 6)         ! Number of fields exchanged from
18                                         ! atmosphere to ocean via tau.F
19!
20        INTEGER jpfldo2a
21        PARAMETER(jpfldo2a = 4)          ! Number of fields exchanged from
22                                         ! ocean to atmosphere
23!
Note: See TracBrowser for help on using the repository browser.