---

Step * of Lemma make-proof-tree_wf

∀[Sequent,Rule:Type]. ∀[effect:(Sequent × Rule) ⟶ (Sequent List?)]. ∀[s:Sequent]. ∀[r:Rule].
∀[L:proof-tree(Sequent;Rule;effect) List].
  (make-proof-tree(s;r;L) ∈ proof-tree(Sequent;Rule;effect)) supposing 
     ((||L|| = ||outl(effect <s, r>)|| ∈ ℤ) and 
     (↑isl(effect <s, r>)))
BY
{ Auto }

1
1. Sequent : Type
2. Rule : Type
3. effect : (Sequent × Rule) ⟶ (Sequent List?)
4. s : Sequent
5. r : Rule
6. L : proof-tree(Sequent;Rule;effect) List
7. ↑isl(effect <s, r>)
8. ||L|| = ||outl(effect <s, r>)|| ∈ ℤ
⊢ make-proof-tree(s;r;L) ∈ proof-tree(Sequent;Rule;effect)

---

Latex:

---

Latex:
\mforall{}[Sequent,Rule:Type].  \mforall{}[effect:(Sequent  \mtimes{}  Rule)  {}\mrightarrow{}  (Sequent  List?)].  \mforall{}[s:Sequent].  \mforall{}[r:Rule].
\mforall{}[L:proof-tree(Sequent;Rule;effect)  List].
    (make-proof-tree(s;r;L)  \mmember{}  proof-tree(Sequent;Rule;effect))  supposing 
          ((||L||  =  ||outl(effect  <s,  r>)||)  and 
          (\muparrow{}isl(effect  <s,  r>)))


By

---

Latex:
Auto

---

Home Index