
Continue to provide the same definitions, but lift the Racket ones rather than rewrite and redefine them.
19 lines
419 B
Racket
19 lines
419 B
Racket
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;;
|
|
;; math.rkt: some extra math routines
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
(module math frtime/frtime-lang-only
|
|
(require (only-in racket/math pi sqr sgn conjugate sinh cosh))
|
|
|
|
(provide (lifted
|
|
sqr
|
|
sgn conjugate
|
|
sinh cosh))
|
|
|
|
(provide pi e)
|
|
|
|
;; circular constants and aliases
|
|
(define e (exp 1.0)))
|
|
|