---

Step * 1 2 1 1 1 of Lemma decidable__equal_compact_domain


1. T : Type
2. S : Type
3. ∀a,b:S.  Dec(a = b ∈ S)
4. f : T ⟶ S
5. g : T ⟶ S
6. eq : EqDecider(S)
7. ∀x:T. eq (f x) (g x) = tt
8. x : T
9. ↑(eq (f x) (g x))
⊢ (f x) = (g x) ∈ S
BY
{ (RW assert_pushdownC (-1) THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  S  :  Type
3.  \mforall{}a,b:S.    Dec(a  =  b)
4.  f  :  T  {}\mrightarrow{}  S
5.  g  :  T  {}\mrightarrow{}  S
6.  eq  :  EqDecider(S)
7.  \mforall{}x:T.  eq  (f  x)  (g  x)  =  tt
8.  x  :  T
9.  \muparrow{}(eq  (f  x)  (g  x))
\mvdash{}  (f  x)  =  (g  x)


By

---

Latex:
(RW  assert\_pushdownC  (-1)  THEN  Auto)

---

Home Index