(16steps)
PrintForm
Definitions
mb
automata
3
Sections
GenAutomata
Doc
At:
member
col
subst
2
2
3
1.
c:
Label
Collection(Term)
2.
r:
rel()
3.
r':
rel()
4.
as:
(Label
Term) List
5.
1of(unzip(as)) = rel_vars(r)
6.
i:
. i < ||as||
2of(as[i])
c(1of(as[i]))
7.
r' = rel_subst(as;r)
8.
i:
9.
i < ||2of(unzip(as))||
(
p.2of(p))(as[i])
c(rel_vars(r)[i])
By:
Reduce 0
THEN
Subst (rel_vars(r)[i] ~ 1of(as[i])) 0
THEN
Try (BackThruSomeHyp THEN (AllHyps (
i.(Unfold `unzip` i) THEN (Reduce i) THEN (RWW "map_length_nat" i))))
Generated subgoal:
1
rel_vars(r)[i] ~ 1of(as[i])
About:
(16steps)
PrintForm
Definitions
mb
automata
3
Sections
GenAutomata
Doc