2 | 13. RL: {y:{x:(S.car*)| 0 < ||x|| & ||x|| n1+1 }| y[(||y||-1)] = si } 14. ||RL|| = n1+1 15. i: ||RL||, j: i. RL[i] = RL[j] 16. s:S.car. mem_f(S.car;s;RL)  ( w:Alph*. (S:w si) = s) 17. k: .
k n 
( RLa:S.car*.
( i:{1..||RL|| }, a:Alph. mem_f(S.car;S.act(a,RL[i]);RL) mem_f(S.car;S.act(a,RL[i]);RLa))
& ( a:Alph. g(a) < k  mem_f(S.car;S.act(a,hd(RL));RL) mem_f(S.car;S.act(a,hd(RL));RLa))
& ( s:S.car. mem_f(S.car;s;RLa)  ( w:Alph*. (S:w si) = s))) RL:S.car*. s:S.car. ( w:Alph*. (S:w si) = s)  mem_f(S.car;s;RL) |