At:
member rel vars
2
2
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))
7.
i: 
8.
i < ||v||
9.
(x term_vars(v[i]))
i+1 < ||v||+1 & (x term_vars([u / v][(i+1)]))
By:
Analyze 0
THEN
RWW "select_cons_tl" 0
THEN
ArithSimp 0
Generated subgoals:
None
About:
