HomeAboutCodePastes

Paste on 2021-04-21T22:30:54

(define (this a b c)
  (print a b c))

(define this
  (case-lambda
    (() this)
    ((a)
     (case-lambda
       (() (this a))
       ((b)
        (lambda (c)
          (this a b c)))
       ((b c)
        (this a b c))))
    ((a b)
     (case-lambda
       (() (this a b))
       ((c)
        (this a b c))))
    ((a b c)
     (print a b c))))

plain