rep   scheme


Defined in:  https://github.com/lambdamusic/extempore-extensions/blob/main/init/init_lisp.xtm

Implementation

;+
; repeat [can use R too]
; eg (rep 2 4) => (2 2 2 2)
(define (rep x y)
  (if (zero? y)
      '()
      (cons x
            (rep x (- y 1)))))


Back to Index

Similar Entries