nub

one of the documented procedures in this installation of the ACS
Usage:
nub   xs
What it does:
removes duplicates from xs
Defined in: /web/philip/tcl/ad-functional.tcl

Source code:


    set result {}
    foreach x $xs {
	if { [not_elem_p $x $result] } {
	    lappend result $x
	}
    }
    return $result


philg@mit.edu