---

Step * 1 of Lemma decidable__wellfound-bounded-exists


1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [P] : T ⟶ ℙ
4. ∀x,y:T.  Dec(R x y)@i
5. ∀x:T. Dec(P[x])@i
6. ∀y:T. ∃L:T List. ∀x:T. ((R x y) ⇒ (x ∈ L))@i
7. ∀[P:T ⟶ ℙ]. ((∀j:T. ((∀k:T. ((R k j) ⇒ P[k])) ⇒ P[j])) ⇒ {∀n:T. P[n]})@i'
8. z : T@i
9. ∀k:T. ((R k z) ⇒ Dec(∃x:T. ((R+ x k) ∧ P[x])))@i
10. L : T List
11. ∀x:T. ((R x z) ⇒ (x ∈ L))
⊢ Dec(∃x:T. ((R+ x z) ∧ P[x]))
BY
{ Assert ⌜Dec((∃y∈L. (R y z) ∧ (∃x:T. ((R+ x y) ∧ P[x]))))⌝⋅ }

1
.....assertion..... 
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [P] : T ⟶ ℙ
4. ∀x,y:T.  Dec(R x y)@i
5. ∀x:T. Dec(P[x])@i
6. ∀y:T. ∃L:T List. ∀x:T. ((R x y) ⇒ (x ∈ L))@i
7. ∀[P:T ⟶ ℙ]. ((∀j:T. ((∀k:T. ((R k j) ⇒ P[k])) ⇒ P[j])) ⇒ {∀n:T. P[n]})@i'
8. z : T@i
9. ∀k:T. ((R k z) ⇒ Dec(∃x:T. ((R+ x k) ∧ P[x])))@i
10. L : T List
11. ∀x:T. ((R x z) ⇒ (x ∈ L))
⊢ Dec((∃y∈L. (R y z) ∧ (∃x:T. ((R+ x y) ∧ P[x]))))

2
1. [T] : Type
2. [R] : T ⟶ T ⟶ ℙ
3. [P] : T ⟶ ℙ
4. ∀x,y:T.  Dec(R x y)@i
5. ∀x:T. Dec(P[x])@i
6. ∀y:T. ∃L:T List. ∀x:T. ((R x y) ⇒ (x ∈ L))@i
7. ∀[P:T ⟶ ℙ]. ((∀j:T. ((∀k:T. ((R k j) ⇒ P[k])) ⇒ P[j])) ⇒ {∀n:T. P[n]})@i'
8. z : T@i
9. ∀k:T. ((R k z) ⇒ Dec(∃x:T. ((R+ x k) ∧ P[x])))@i
10. L : T List
11. ∀x:T. ((R x z) ⇒ (x ∈ L))
12. Dec((∃y∈L. (R y z) ∧ (∃x:T. ((R+ x y) ∧ P[x]))))
⊢ Dec(∃x:T. ((R+ x z) ∧ P[x]))

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  [R]  :  T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}
3.  [P]  :  T  {}\mrightarrow{}  \mBbbP{}
4.  \mforall{}x,y:T.    Dec(R  x  y)@i
5.  \mforall{}x:T.  Dec(P[x])@i
6.  \mforall{}y:T.  \mexists{}L:T  List.  \mforall{}x:T.  ((R  x  y)  {}\mRightarrow{}  (x  \mmember{}  L))@i
7.  \mforall{}[P:T  {}\mrightarrow{}  \mBbbP{}].  ((\mforall{}j:T.  ((\mforall{}k:T.  ((R  k  j)  {}\mRightarrow{}  P[k]))  {}\mRightarrow{}  P[j]))  {}\mRightarrow{}  \{\mforall{}n:T.  P[n]\})@i'
8.  z  :  T@i
9.  \mforall{}k:T.  ((R  k  z)  {}\mRightarrow{}  Dec(\mexists{}x:T.  ((R\msupplus{}  x  k)  \mwedge{}  P[x])))@i
10.  L  :  T  List
11.  \mforall{}x:T.  ((R  x  z)  {}\mRightarrow{}  (x  \mmember{}  L))
\mvdash{}  Dec(\mexists{}x:T.  ((R\msupplus{}  x  z)  \mwedge{}  P[x]))


By

---

Latex:
Assert  \mkleeneopen{}Dec((\mexists{}y\mmember{}L.  (R  y  z)  \mwedge{}  (\mexists{}x:T.  ((R\msupplus{}  x  y)  \mwedge{}  P[x]))))\mkleeneclose{}\mcdot{}

---

Home Index