## preprocessor common block for holding string statement info
 #  Put on a file called 'csbuf'
 #  Used only by ratfiv preprocessor
 
 common /csbuf/ sbp, sbuf(MAXSTRING)
   integer sbp      # next available character position; init = 1
   character sbuf   # saved for data statements