source: LMDZ4/branches/pre_V3/libf/phylmd/indicesol.inc @ 2847

Last change on this file since 2847 was 701, checked in by (none), 19 years ago

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

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 406 bytes
RevLine 
[524]1!
2! $Header$
3!
4      INTEGER, parameter :: nbsrf=4
5      INTEGER, parameter :: is_oce=3 !ocean
6      INTEGER, parameter :: is_sic = 4 ! glace de mer
7      INTEGER, parameter :: is_ter = 1 ! terre
8      INTEGER, parameter :: is_lic = 2 ! glacier continental
9      REAL,parameter :: epsfra = 1.0E-05
10!
11      CHARACTER (len=3),dimension(nbsrf) :: clnsurf(nbsrf)
12      DATA clnsurf/'ter', 'lic', 'oce', 'sic'/
Note: See TracBrowser for help on using the repository browser.