Ignore:
Timestamp:
Jul 5, 2000, 4:58:04 PM (24 years ago)
Author:
lmdzadmin
Message:

Interface avec les differentes surface, version de travail.LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ.3.3/branches/rel-LF/libf/phylmd/oasis.h

    r79 r98  
    1       LOGICAL ok_oasis
    2       PARAMETER (ok_oasis = .FALSE.)
    3 c
    4       CHARACTER*4 cchan
    5       PARAMETER (cchan="PIPE")
    6 c      PARAMETER (cchan="CLIM")
     1C
     2C -- oasis.h   
     3C    ******
     4C@
     5C@  Contents : choice for the OASIS version: clim or pipe
     6C@  --------
    77
    8       INTEGER jpmaxfld
    9       PARAMETER(jpmaxfld = 20)
     8      logical ok_oasis
     9      parameter(ok_oasis = .false.)
     10
     11      CHARACTER*8 cchan
     12      PARAMETER ( cchan='PIPE' )
     13C
     14C     --- end of oasis.h
Note: See TracChangeset for help on using the changeset viewer.