At: mn 23 refinment1 1. Alph: Type 2. L: LangOver(Alph) 3. R: Alph*Alph*Prop 4. EquivRel x,y:Alph*. x R y 5. g: (x,y:Alph*//(x R y)) 6. l:Alph*. L(l) g(l) 7. x,y,z:Alph*. (x R y) ((z @ x) R (z @ y)) 8. x: Alph* 9. y: Alph* 10. x R y
x L-induced Equiv y By: Unfold `lang_rel` 0
THEN
Reduce 0 Generated subgoal: