options nodate nonumber ps=2000;
data lucency;
infile 'K:\lucency.data.txt' firstobs=2;
  input lucency blade_size  tt_area  tt_width age wt_kg pin unibi;
 rwidth = 1.0/tt_width;
 rarea  = 1.0/tt_area;
run;