Step
*
of Lemma
mFO-dest-atomic_wf
∀[T:Type]. ∀[F:Atom ─→ (ℤ List) ─→ (T?)]. ∀[fmla:mFOL()]. (let nm,vars = dest-atomic(fmla) inF[nm;vars] ∈ T?)
BY
{ (Auto THEN Unfold `mFO-dest-atomic` 0 THEN AutoBoolCase ⌈mFOatomic?(fmla)⌉⋅)⋅ }
Latex:
\mforall{}[T:Type]. \mforall{}[F:Atom {}\mrightarrow{} (\mBbbZ{} List) {}\mrightarrow{} (T?)]. \mforall{}[fmla:mFOL()].
(let nm,vars = dest-atomic(fmla) in
F[nm;vars] \mmember{} T?)
By
(Auto THEN Unfold `mFO-dest-atomic` 0 THEN AutoBoolCase \mkleeneopen{}mFOatomic?(fmla)\mkleeneclose{}\mcdot{})\mcdot{}
Home
Index