kunishi · January 29, 2014 10:20
diff --git a/removex.sml b/removex.sml
 fun removex n nil = nil
 |  removex n (x::xs) = 
    (if n=x then (fn y => y)
            else (fn y => (x::y))) (removex n xs);
	fun removex n nil = nil
	\| removex n (x::xs) =
	(if n=x then (fn y => y)
	else (fn y => (x::y))) (removex n xs);