(STRATEGY
    INNERMOST)

(VAR
    X)
(DATATYPES
    A = µX.< cons(X, X), n__f(X), n__s(X), n__0 >)
(SIGNATURES
    f :: [A] -> A
    p :: [A] -> A
    s :: [A] -> A
    0 :: [] -> A
    activate :: [A] -> A)
(RULES
    f(0()) -> cons(0()
                  ,n__f(n__s(n__0())))
    f(s(0())) -> f(p(s(0())))
    p(s(X)) -> X
    f(X) -> n__f(X)
    s(X) -> n__s(X)
    0() -> n__0()
    activate(n__f(X)) ->
      f(activate(X))
    activate(n__s(X)) ->
      s(activate(X))
    activate(n__0()) -> 0()
    activate(X) -> X)