(mod (X)
  (include *standard-cl-23*)
  (include reverse.clinc)

  (reverse X)
  )