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