source: LMDZ.3.3/branches/rel-LF/libf/phylmd/param_cou.h @ 140

Last change on this file since 140 was 109, checked in by lmdzadmin, 24 years ago

Deplacement des dernieres lignes concernant le sol hors de la physique
LF

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 661 bytes
Line 
1C $Id: param_cou.h 109 2000-07-26 12:58:36Z lmdzadmin $
2C
3C -- param_cou.h
4C
5        INTEGER jpmaxfld
6        PARAMETER(jpmaxfld = 40)        ! Maximum number of fields exchanged
7                                        ! between ocean and atmosphere
8        INTEGER jpflda2o1
9        PARAMETER(jpflda2o1 = 11)         ! Number of fields exchanged from
10                                         ! atmosphere to ocean via flx.F
11        INTEGER jpflda2o2
12        PARAMETER(jpflda2o2 = 4)         ! Number of fields exchanged from
13                                         ! atmosphere to ocean via tau.F
14C
15        INTEGER jpfldo2a
16        PARAMETER(jpfldo2a = 4)          ! Number of fields exchanged from
17                                         ! ocean to atmosphere
18C
Note: See TracBrowser for help on using the repository browser.