1 | 8. g o f = Id 9. f o g = Id 10. k:  11. 0 < k 12. k nn 13. RLa: S.car* 14. i:{1..1 }, a:Alph. si = S.act(a,[si][i]) False mem_f(S.car;S.act(a,[si][i]);RLa) 15. a:Alph. g(a) < k-1  si = S.act(a,si) False mem_f(S.car;S.act(a,si);RLa) 16. s:S.car. mem_f(S.car;s;RLa)  ( w:Alph*. (S:w si) = s) 17. a: Alph 18. g(a) < k 19. g(a) < k-1 20. g(a) = k-1 nn (f o g)(a) = a |