clear up findDihedral.tcl