(mod (X Y)
  (include *standard-cl-21*)
  (include prepend.clinc)
  (prepend X Y)
  )