#
setenv DATAFILE $1
setenv INDUCER $2
setenv ID3_UNKNOWN_EDGES no
setenv DISP_CONFUSION_MAT yes
if ( $3 == "dotty" ) then
  setenv DISPLAY_STRUCT dotty
  Inducer
  FIX-NAME.perl Inducer dot $1 $2 
  dot -Tps -Gpage="8.5,11" -Gmargin="0,0" $1-$2.dot > $1-$2.ps
else 
  setenv DISPLAY_STRUCT treeviz
  Inducer
  REPLACE-NAME.perl Inducer treeviz treeviz.data $1 $2
  FIX-NAME.perl Inducer treeviz $1 $2
  FIX-NAME.perl Inducer treeviz.data $1 $2
endif