At: min auto con 1 1 1 2
1. Alph: Type
2. St: Type
3. Auto: Automata(Alph;St)
4. Fin(Alph)
5. Fin(St)
6. EquivRel x,y:Alph*. x LangOf(Auto)-induced Equiv y
7. s: x,y:Alph*//(x LangOf(Auto)-induced Equiv y)
8. x: Alph*
9. y: Alph*
Dec(x (
x,y. x = y
x,y:Alph*//(x LangOf(Auto)-induced Equiv y)) y)
By:
Reduce 0
THEN
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: