---

Step * 1 1 2 1 1 of Lemma priority-select-ff


1. T : Type
2. as : T List
3. f : T ⟶ 𝔹
4. g : T ⟶ 𝔹
5. T ⊆r ℤ
6. ∀i:ℕ||as||. ∀j:ℕi.  (as[j] ≤ as[i])
7. (priority-select(f;g;as) = (inl ff) ∈ (𝔹?)) ⇒ (∃i:ℕ||as||. ((↑(g as[i])) ∧ (∀j:ℕi + 1. (¬↑(f as[j])))))
8. (priority-select(f;g;as) = (inl ff) ∈ (𝔹?)) ⇐ ∃i:ℕ||as||. ((↑(g as[i])) ∧ (∀j:ℕi + 1. (¬↑(f as[j]))))
9. i : ℕ||as||
10. ↑(g as[i])
11. ∀j:ℕi + 1. (¬↑(f as[j]))
12. ↑(g as[i])
13. b : T
14. i1 : ℕ
15. i1 < ||as||
16. b = as[i1] ∈ T
17. b ≤ as[i]
18. ¬(i1 ≤ i)
19. as[i] ≤ as[i1]
⊢ as[i1] = as[i] ∈ T
BY
{ (Assert ⌜as[i1] = as[i] ∈ ℤ⌝⋅ THEN Auto') }

1
1. T : Type
2. as : T List
3. f : T ⟶ 𝔹
4. g : T ⟶ 𝔹
5. T ⊆r ℤ
6. ∀i:ℕ||as||. ∀j:ℕi.  (as[j] ≤ as[i])
7. (priority-select(f;g;as) = (inl ff) ∈ (𝔹?)) ⇒ (∃i:ℕ||as||. ((↑(g as[i])) ∧ (∀j:ℕi + 1. (¬↑(f as[j])))))
8. (priority-select(f;g;as) = (inl ff) ∈ (𝔹?)) ⇐ ∃i:ℕ||as||. ((↑(g as[i])) ∧ (∀j:ℕi + 1. (¬↑(f as[j]))))
9. i : ℕ||as||
10. ↑(g as[i])
11. ∀j:ℕi + 1. (¬↑(f as[j]))
12. ↑(g as[i])
13. b : T
14. i1 : ℕ
15. i1 < ||as||
16. b = as[i1] ∈ T
17. b ≤ as[i]
18. ¬(i1 ≤ i)
19. as[i] ≤ as[i1]
20. as[i1] = as[i] ∈ ℤ
⊢ as[i1] = as[i] ∈ T

---

Latex:

---

Latex:

1.  T  :  Type
2.  as  :  T  List
3.  f  :  T  {}\mrightarrow{}  \mBbbB{}
4.  g  :  T  {}\mrightarrow{}  \mBbbB{}
5.  T  \msubseteq{}r  \mBbbZ{}
6.  \mforall{}i:\mBbbN{}||as||.  \mforall{}j:\mBbbN{}i.    (as[j]  \mleq{}  as[i])
7.  (priority-select(f;g;as)  =  (inl  ff))  {}\mRightarrow{}  (\mexists{}i:\mBbbN{}||as||.  ((\muparrow{}(g  as[i]))  \mwedge{}  (\mforall{}j:\mBbbN{}i  +  1.  (\mneg{}\muparrow{}(f  as[j])))))
8.  (priority-select(f;g;as)  =  (inl  ff))  \mLeftarrow{}{}  \mexists{}i:\mBbbN{}||as||.  ((\muparrow{}(g  as[i]))  \mwedge{}  (\mforall{}j:\mBbbN{}i  +  1.  (\mneg{}\muparrow{}(f  as[j]))))
9.  i  :  \mBbbN{}||as||
10.  \muparrow{}(g  as[i])
11.  \mforall{}j:\mBbbN{}i  +  1.  (\mneg{}\muparrow{}(f  as[j]))
12.  \muparrow{}(g  as[i])
13.  b  :  T
14.  i1  :  \mBbbN{}
15.  i1  <  ||as||
16.  b  =  as[i1]
17.  b  \mleq{}  as[i]
18.  \mneg{}(i1  \mleq{}  i)
19.  as[i]  \mleq{}  as[i1]
\mvdash{}  as[i1]  =  as[i]


By

---

Latex:
(Assert  \mkleeneopen{}as[i1]  =  as[i]\mkleeneclose{}\mcdot{}  THEN  Auto')

---

Home Index