Vertices(the_graph)+Vertices(the_graph)
i1-the_graph- > *j s2) i1-the_graph- > *j Vertices(the_graph)+Vertices(the_graph) i1-the_graph- > *j
traversal(the_graph)traversal(the_graph)Prop
s:traversal(the_graph), i:Vertices(the_graph). (inl(i) s) 
(inr(i) s) 
P(i,s,nil)
s1,s2,s3:traversal(the_graph), i,j:Vertices(the_graph).
i-the_graph- > j
paren(Vertices(the_graph);s2)
(k:Vertices(the_graph). (inr(k) s2) j-the_graph- > *k)
paren(Vertices(the_graph);s3) P(j,s1,s2) P(i,s2 @ s1,s3) P(i,s1,s3 @ s2)
s1,s2:traversal(the_graph), i:Vertices(the_graph).
(inr(i) s1)
(inl(i) s1)
paren(Vertices(the_graph);s2)
l_disjoint(Vertices(the_graph)+Vertices(the_graph);s2;s1)
no_repeats(Vertices(the_graph)+Vertices(the_graph);s2)
(j:Vertices(the_graph). (inr(j) s2) i-the_graph- > *j)
(j:Vertices(the_graph). i-the_graph- > j j = i (inl(j) s2) (inl(j) s1) (inr(j) s1))
P(i,[inr(i) / s1],s2) P(i,s1,[inl(i) / (s2 @ [inr(i)])])
member-paren(x,y.the_obj.eq(x,y);i1;s1)
j:Vertices(the_graph).
i1-the_graph- > j j = i1 (inl(j) s2) member-paren(x,y.the_obj.eq(x,y);j;s1)
j:Vertices(the_graph). (inr(j) s2) i1-the_graph- > *j
[inl(i1) / (s2 @ [inr(i1)])])
i1-the_graph- > *j
l:T List, a,x:T. (x [a / l]) 
x = a (x l)
-1
x:T, l1,l2:T List. (x l1 @ l2) (x l1) (x l2)
-1
a,x:T. (x [a]) x = a
-1
| 1 | 20. inr(j) = inl(i1) Vertices(the_graph)+Vertices(the_graph) i1-the_graph- > *j | 1 step |
| 2 | 20. (inr(j) s2) i1-the_graph- > *j | 1 step |
| 3 | 20. inr(j) = inr(i1) Vertices(the_graph)+Vertices(the_graph) i1-the_graph- > *j | 3 steps |
About:
 |  |  |  |  |  |  |  |  |
 |  |  |  |  |  |  |