Nuprl - Pf tc ioa inv vc 1 2 2 2 1

(20steps) PrintForm Definitions Lemmas mb automata 4 Sections GenAutomata Doc

1. A: ioa{i:l}()
2. I: Fmla
3. de: sig()
4. tc_ioa(A;de)
5. tc_pred(I;A.ds; < > ;de)
6. covers_pred(A;I)
7. closed_pred(I)
8. single_valued_decls(A.ds)
9. v: vc{i:l}()
10. a: dec()
11. a A.da
12. r: rel()
13. r smts_eff_pred(action_effect(a.lbl;A.eff;A.frame);I)

tc(r;A.ds;dec_lookup(A.da;a.lbl);de)

By: (((Unfold `smts_eff_pred` -1) THEN (Using [`T',rel()] (FwdThru Thm* c:Collection(T), f:(TCollection(T')), y:T'. y (xc.f(x)) (x:T. x c & y f(x)) [-1]))) THEN ExRepD THEN (Unfold `smts_eff_rel` -1) THEN (RWW "member_col_subst" -1) THEN ExRepD THEN (HypSubst -1 0)) THENA (Auto THEN (Try (Fold `pred` 0)))

Generated subgoal:

1 13. r (rI.smts_eff_rel(action_effect(a.lbl;A.eff;A.frame);r))
14. r1: rel()
15. r1 I
16. as: (LabelTerm) List
17. 1of(unzip(as)) = rel_vars(r1)
18. i:. i < ||as|| 2of(as[i]) (x.smts_eff(action_effect(a.lbl;A.eff;A.frame);x))(1of(as[i]))
19. r = rel_subst(as;r1)
tc(rel_subst(as;r1);A.ds;dec_lookup(A.da;a.lbl);de)

(20steps) PrintForm Definitions Lemmas mb automata 4 Sections GenAutomata Doc