C C DEFAULT TAPE UNIT AND SIZE. C PARAMETER DFTAPE=2HMM,DFUNIT=0 C C MAXIMUM TAPE RECORD SIZE AND LINE SIZE. C LINE SIZE SHOULD BE DIVISIBLE BY 2, AND MAY NOT EXCEED 510 WITHOUT C CHANGES IN PROGRAM. C PARAMETER BUFSIZ=12000,LINSIZ=510