define-provide.ss
#lang scheme/base

(define-syntax define/provide
  (syntax-rules ()
    ((_ (a b ...) c ...)
     (define/provide a (λ (b ...) c ...)))
    ((_ a b ...)
     (begin
       (define a b ...)
       (provide a)))))

(provide define/provide)