Some people like Clojure-/Elixir-style function pipelines. As '->' is taken, we use '|>':

(private) (X L F)

(de |> (X . L)
   (for F L
      (setq X (F X)) ) )

: (|> (1 2 3 4) cdr cdr car)
-> 3
: (|> (1 2 3) cadr ((N) (* N N)) inc)
-> 5