[functional-tests] Add math-utils library
This commit is contained in:
parent
79c0159108
commit
4bb99bf105
10
functional-tests/math-utils.scm
Normal file
10
functional-tests/math-utils.scm
Normal file
@ -0,0 +1,10 @@
|
|||||||
|
(library
|
||||||
|
(math-utils)
|
||||||
|
|
||||||
|
(export div-up)
|
||||||
|
|
||||||
|
(import (chezscheme))
|
||||||
|
|
||||||
|
(define (div-up n d)
|
||||||
|
(/ (+ n (- d 1)) d))
|
||||||
|
)
|
Loading…
Reference in New Issue
Block a user