c common block for input line parsing integer*4 len,point,tlen character*80 line,token logical blankline common/inline/len,point,tlen,line,token,blankline