sequences: remove-of? words aren't as good as i had hoped

diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 7ff0947f28ec515ff87ff7ae4fcbd61eee09a3a4..d9825b8b992e00598b1826a86c9837f062bd9f97 100644 (file)
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -699,27 +699,15 @@ PRIVATE>
 : member? ( elt seq -- ? )
     [ = ] with any? ;
 
-: member-of? ( seq elt -- ? )
-    [ = ] curry any? ;
-
 : member-eq? ( elt seq -- ? )
     [ eq? ] with any? ;
 
-: member-eq-of? ( seq elt -- ? )
-    [ eq? ] curry any? ;
-
 : remove ( elt seq -- newseq )
     [ = ] with reject ;
 
-: remove-of ( seq elt -- newseq )
-    [ = ] curry reject ;
-
 : remove-eq ( elt seq -- newseq )
     [ eq? ] with reject ;
 
-: remove-eq-of ( seq elt -- newseq )
-    [ eq? ] curry reject ;
-
 : sift ( seq -- newseq )
     [ ] filter ;