You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
7 lines
145 B
Racket
7 lines
145 B
Racket
8 years ago
|
#lang br
|
||
|
|
(provide b-sum b-expr)
|
||
|
|
|
||
|
|
(define (b-sum . vals) (apply + vals))
|
||
|
|
|
||
|
|
(define (b-expr expr)
|
||
|
|
(if (integer? expr) (inexact->exact expr) expr))
|