; @origtpdbfilename ./TRS/TRCSR/Ex9_BLR02_L.trs
; @xtcfilename "./TRS_Standard/Transformed_CSR_04/Ex9_BLR02_L.xml"
(format TRS)
(fun filter 3)
(fun cons 1)
(fun |0| 0)
(fun s 1)
(fun sieve 1)
(fun nats 1)
(fun zprimes 0)
(rule (filter (cons X) |0| M) (cons |0|))
(rule (filter (cons X) (s N) M) (cons X))
(rule (sieve (cons |0|)) (cons |0|))
(rule (sieve (cons (s N))) (cons (s N)))
(rule (nats N) (cons N))
(rule zprimes (sieve (nats (s (s |0|)))))