fstsplit 0 x nil fstsplit s n nil nil fstsplit s n cons h t cons h fstsplit n t sndsplit 0 x x sndsplit s n nil nil sndsplit s n cons h t sndsplit n t empty nil true empty cons h t false leq 0 m true leq s n 0 false leq s n s m leq n m length nil 0 length cons h t s length t app nil x x app cons h t x cons h app t x map_f pid nil nil map_f pid cons h t app f pid h map_f pid t process store m if1 store m leq m length store if1 store m true if2 store m empty fstsplit m store if1 store m false if3 store m empty fstsplit m app map_f self nil store if2 store m false process app map_f self nil sndsplit m store m if3 store m false process sndsplit m app map_f self nil store m fstsplit 2 0 0 nil 0 s 1 cons 2 sndsplit 2 empty 1 true 0 false 0 leq 2 length 1 app 2 map_f 2 f 2 process 2 if1 3 if2 3 if3 3 self 0 FULL ./TRS/AProVE/AAECC.trs