Step
*
1
1
1
1
1
2
of Lemma
finite-injective-quotient
.....wf..... 
1. T : Type
2. S : Type
3. f : T ⟶ S
4. finite(S)
5. ∀s:S. Dec(∃t:T. (f[t] = s ∈ S))
6. {f ∈ T//t.f[t] ⟶ {s:S| ∃t:T. ((f t) = s ∈ S)} }
7. a1 : T//t.f[t]
8. a2 : T//t.f[t]
⊢ istype((f a1) = (f a2) ∈ {s:S| ∃t:T. ((f t) = s ∈ S)} )
BY
{ (Unfold `guard` -3 THEN D 0 THEN Try ((MemCD THEN Trivial))) }
1
1. T : Type
2. S : Type
3. f : T ⟶ S
4. finite(S)
5. ∀s:S. Dec(∃t:T. (f[t] = s ∈ S))
6. f ∈ T//t.f[t] ⟶ {s:S| ∃t:T. ((f t) = s ∈ S)} 
7. a1 : T//t.f[t]
8. a2 : T//t.f[t]
⊢ istype({s:S| ∃t:T. ((f t) = s ∈ S)} )
Latex:
Latex:
.....wf..... 
1.  T  :  Type
2.  S  :  Type
3.  f  :  T  {}\mrightarrow{}  S
4.  finite(S)
5.  \mforall{}s:S.  Dec(\mexists{}t:T.  (f[t]  =  s))
6.  \{f  \mmember{}  T//t.f[t]  {}\mrightarrow{}  \{s:S|  \mexists{}t:T.  ((f  t)  =  s)\}  \}
7.  a1  :  T//t.f[t]
8.  a2  :  T//t.f[t]
\mvdash{}  istype((f  a1)  =  (f  a2))
By
Latex:
(Unfold  `guard`  -3  THEN  D  0  THEN  Try  ((MemCD  THEN  Trivial)))
Home
Index