data tc50;
infile in;
input area 1-13 perim 14-26 TC1 27-32 TC2 33-38 TS 39-47 TY 48-56
      STY 57-65 TCV 66-74;
proc print;
run;