Ignore:
Timestamp:
Jan 12, 2000, 3:05:47 PM (25 years ago)
Author:
lmdz
Message:

Changement de oasis.F pour passage sur Nec LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ.3.3/trunk/libf/phylmd/oasis.h

    r2 r13  
    22      PARAMETER (ok_oasis = .FALSE.)
    33c
    4       CHARACTER*8 cchain
    5       PARAMETER (cchain="PIPE")
    6 c      PARAMETER (cchain="CLIM")
     4      CHARACTER*4 cchan
     5      PARAMETER (cchan="PIPE")
     6c      PARAMETER (cchan="CLIM")
     7
     8      INTEGER jpmaxfld
     9      PARAMETER(jpmaxfld = 20)
Note: See TracChangeset for help on using the changeset viewer.