At:
member rel vars
2
1
1
1.
x: Label
2.
name: relname()
3.
r1: Term List
4.
u: Term
5.
v: Term List
6.
(x 
reduce(
t,vs. term_vars(t) @ vs;nil;v)) 
(
i:
. i < ||v|| & (x term_vars(v[i])))
7.
(x term_vars(u))
8.
0 < ||v||+1
(x term_vars([u / v][0]))
By:
RWW "select_cons_hd" 0
Generated subgoals:
None
About:
