RECURSIVE RemoveElems(_,_)
RemoveElems(COND(_), q) ==
IF q = <<>> THEN <<>>
ELSE LET h == Head(q)
IN IF COND(h)
THEN RemoveElems(COND, Tail(q))
ELSE <<h>> \o RemoveElems(COND, Tail(q))
LLL == RemoveElems(LAMBDA x : x = 4, <<5,3,6,7,4,3,4,5,7,8,2,1>>)