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

Last change on this file since 1762 was 397, checked in by lmdzadmin, 22 years ago

Champs supplementaire dans le coupleur (calving) + dependance des routines
"couplees" aux include
LF

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