function print_dfsa_old(DFSA,fname)
if ~exist('fname','var')
  fname = inputname(1);
end
DS = deadstate_dfsa(DFSA);
fprintf('Information for DFSA " 	%s":\n',fname);
fprintf('Alphabet: "%s"\n',DFSA.ALF);  
fprintf('The states Q: %s\n',num2str(DFSA.Q));  
fprintf('Start state: %d\n',DFSA.q0);
fprintf('Accepting states: [%s]\n',num2str(sort(DFSA.F)));
fprintf('Dead states: %s\n',num2str(DS));  
for q = DFSA.Q
  for s = DFSA.ALF
    r = dfsa_delta(DFSA,q,double(s));
    fprintf('(%3d,%s) -> %3d \n',q,s,r);
  end
end
return