; @author Jonas Schöpf
; Ctrl example from examples/llreve/llreve_faulty_limit2a.ctrs
(format LCTRS :smtlib 2.6)

(theory Ints)

(fun f1 (-> Int  Int))
(fun u_5 (-> Int Int  Int))

(rule (u_5  n w_2) (+  n w_2))
(rule (f1  n) (u_5  n (f1  (-  n 1))) :guard (> n 0))
(rule (f1  n) n :guard (<= n 0))