data leach;
infile 'a:solute.dat';
input irep 3 afun $ 6 asz $ 8-9 itrt 11-13 @17 b 4.3 @24 zn 4.3
      @31 pna 4.2 @39 pnh 4.2 @47 pno;
proc print;
run;