Changeset 98 for LMDZ.3.3/branches/rel-LF/libf/phylmd/oasis.h
- Timestamp:
- Jul 5, 2000, 4:58:04 PM (24 years ago)
- 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") 1 C 2 C -- oasis.h 3 C ****** 4 C@ 5 C@ Contents : choice for the OASIS version: clim or pipe 6 C@ -------- 7 7 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' ) 13 C 14 C --- end of oasis.h
Note: See TracChangeset
for help on using the changeset viewer.