At: homo is surj 1 1 2 1
1. Alph: Type
2. St: Type
3. Auto: Automata(Alph;St)
4. c: St
Alph*
5.
q:St. (Result(Auto)c(q)) = q
6. Fin(Alph)
7. Fin(St)
8. EquivRel x,y:Alph*. x LangOf(Auto)-induced Equiv y
9. x: Alph*
10. y: Alph*
Dec(x = y
x,y:Alph*//(x LangOf(Auto)-induced Equiv y))
By: BackThru
Thm*
Auto:Automata(Alph;St).
Fin(Alph) & Fin(St) 
(
x,y:Alph*. Dec(x = y
x,y:Alph*//(x LangOf(Auto)-induced Equiv y)))
Generated subgoals:None
About: