---

Step * 1 2 of Lemma mon_for_when_none

.....falsecase..... 
1. s : DSet
2. g : IMonoid
3. f : |s| ⟶ |g|
4. b : |s| ⟶ 𝔹
5. a : |s|
6. as : |s| List
7. (∀x:|s|. ((↑(x ∈b as)) ⇒ (¬↑b[x]))) ⇒ ((For{g} x ∈ as. (when b[x]. f[x])) = e ∈ |g|)
8. ∀x:|s|. ((↑((a (=b) x) ∨b(x ∈b as))) ⇒ (¬↑b[x]))
9. ¬↑b[a]
⊢ (e * (For{g} x ∈ as. if b[x] then f[x] else e fi )) = e ∈ |g|
BY
{ (((RW MonNormC 0 THENM Fold `mon_when` 0) THENM BHyp 7) THENA Auto) }

1
1. s : DSet
2. g : IMonoid
3. f : |s| ⟶ |g|
4. b : |s| ⟶ 𝔹
5. a : |s|
6. as : |s| List
7. (∀x:|s|. ((↑(x ∈b as)) ⇒ (¬↑b[x]))) ⇒ ((For{g} x ∈ as. (when b[x]. f[x])) = e ∈ |g|)
8. ∀x:|s|. ((↑((a (=b) x) ∨b(x ∈b as))) ⇒ (¬↑b[x]))
9. ¬↑b[a]
⊢ ∀x:|s|. ((↑(x ∈b as)) ⇒ (¬↑b[x]))

---

Latex:

---

Latex:
.....falsecase..... 
1.  s  :  DSet
2.  g  :  IMonoid
3.  f  :  |s|  {}\mrightarrow{}  |g|
4.  b  :  |s|  {}\mrightarrow{}  \mBbbB{}
5.  a  :  |s|
6.  as  :  |s|  List
7.  (\mforall{}x:|s|.  ((\muparrow{}(x  \mmember{}\msubb{}  as))  {}\mRightarrow{}  (\mneg{}\muparrow{}b[x])))  {}\mRightarrow{}  ((For\{g\}  x  \mmember{}  as.  (when  b[x].  f[x]))  =  e)
8.  \mforall{}x:|s|.  ((\muparrow{}((a  (=\msubb{})  x)  \mvee{}\msubb{}(x  \mmember{}\msubb{}  as)))  {}\mRightarrow{}  (\mneg{}\muparrow{}b[x]))
9.  \mneg{}\muparrow{}b[a]
\mvdash{}  (e  *  (For\{g\}  x  \mmember{}  as.  if  b[x]  then  f[x]  else  e  fi  ))  =  e


By

---

Latex:
(((RW  MonNormC  0  THENM  Fold  `mon\_when`  0)  THENM  BHyp  7)  THENA  Auto)

---

Home Index