(STRATEGY
    INNERMOST)

(VAR
    N X X1 X2 XS)
(DATATYPES
    A = µX.< cons(X, X), n__from(X), s(X), 0, nil, n__take(X, X) >)
(SIGNATURES
    from :: [A] -> A
    head :: [A] -> A
    2nd :: [A] -> A
    take :: [A x A] -> A
    sel :: [A x A] -> A
    activate :: [A] -> A)
(RULES
    from(X) -> cons(X,n__from(s(X)))
    head(cons(X,XS)) -> X
    2nd(cons(X,XS)) ->
      head(activate(XS))
    take(0(),XS) -> nil()
    take(s(N),cons(X,XS)) -> cons(X
                                 ,n__take(N,activate(XS)))
    sel(0(),cons(X,XS)) -> X
    sel(s(N),cons(X,XS)) -> sel(N
                               ,activate(XS))
    from(X) -> n__from(X)
    take(X1,X2) -> n__take(X1,X2)
    activate(n__from(X)) -> from(X)
    activate(n__take(X1,X2)) ->
      take(X1,X2)
    activate(X) -> X)