---

Step * 1 2 of Lemma enum-fin-seq-max2_wf


1. M : n:ℕ ⟶ (ℕn ⟶ 𝔹) ⟶ (ℕ?)
2. m : ℕ
⊢ (∃b∈map(λs.case M m s of inl(k) => k + 1 | inr(x) => 0;enum-fin-seq(m)). 0 ≤ b)
BY
{ ((RWO "l_exists_map" 0 THEN Auto)
   THEN Reduce 0
   THEN (RWO "l_exists_iff" 0 THENA Auto)
   THEN InstConcl [⌜λx.tt⌝]⋅
   THEN Auto) }

1
1. M : n:ℕ ⟶ (ℕn ⟶ 𝔹) ⟶ (ℕ?)
2. m : ℕ
⊢ (λx.tt ∈ enum-fin-seq(m))

---

Latex:

---

Latex:

1.  M  :  n:\mBbbN{}  {}\mrightarrow{}  (\mBbbN{}n  {}\mrightarrow{}  \mBbbB{})  {}\mrightarrow{}  (\mBbbN{}?)
2.  m  :  \mBbbN{}
\mvdash{}  (\mexists{}b\mmember{}map(\mlambda{}s.case  M  m  s  of  inl(k)  =>  k  +  1  |  inr(x)  =>  0;enum-fin-seq(m)).  0  \mleq{}  b)


By

---

Latex:
((RWO  "l\_exists\_map"  0  THEN  Auto)
  THEN  Reduce  0
  THEN  (RWO  "l\_exists\_iff"  0  THENA  Auto)
  THEN  InstConcl  [\mkleeneopen{}\mlambda{}x.tt\mkleeneclose{}]\mcdot{}
  THEN  Auto)

---

Home Index