data geol;
   infile 'filename'
   input state $ 1-3 county $ 5-12 sqmile 14-19
         region 22-24 tract 27-29 code $ 32-33
         rainfall 37-40 temp 43-46 temptype $ 49;
proc print data=geol;
run;