---

Step * 1 10 1 2 1 of Lemma mFOL-proveable-evidence


1. hyps : mFOL() List@i
2. concl : mFOL()@i
3. subgoals : mFOL-sequent() List@i
4. hypnum : ℕ@i
5. hypnum < ||hyps||
6. ↑mFOconnect?(hyps[hypnum])
7. mFOconnect-knd(hyps[hypnum]) = "imp" ∈ Atom
8. mFOL-sequent-evidence(<hyps, mFOconnect-left(hyps[hypnum])>)
9. hyps[hypnum] = mFOconnect-left(hyps[hypnum]) ⇒ mFOconnect-right(hyps[hypnum]) ∈ mFOL()
⊢ mFOL-sequent-evidence(<hyps, hyps[hypnum] ∧ mFOconnect-left(hyps[hypnum])>)
BY
{ ((BLemma `mFOL-sequent-evidence_and` THEN Auto) THEN BLemma `mFOL-sequent-evidence-trivial` THEN Auto)⋅ }

---

Latex:



1.  hyps  :  mFOL()  List@i
2.  concl  :  mFOL()@i
3.  subgoals  :  mFOL-sequent()  List@i
4.  hypnum  :  \mBbbN{}@i
5.  hypnum  <  ||hyps||
6.  \muparrow{}mFOconnect?(hyps[hypnum])
7.  mFOconnect-knd(hyps[hypnum])  =  "imp"
8.  mFOL-sequent-evidence(<hyps,  mFOconnect-left(hyps[hypnum])>)
9.  hyps[hypnum]  =  mFOconnect-left(hyps[hypnum])  {}\mRightarrow{}  mFOconnect-right(hyps[hypnum])
\mvdash{}  mFOL-sequent-evidence(<hyps,  hyps[hypnum]  \mwedge{}  mFOconnect-left(hyps[hypnum])>)


By

((BLemma  `mFOL-sequent-evidence\_and`  THEN  Auto)
  THEN  BLemma  `mFOL-sequent-evidence-trivial`
  THEN  Auto)\mcdot{}

---

Home Index