artemist/mes
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

mes: Add ceil, floor, round, inexact->exact.

Browse source 
* mes/module/mes/scm.mes (ceil, floor, round, inexact->exact,
exact->inexact): New function.
This commit is contained in:
Jan Nieuwenhuizen 2018-10-21 12:07:06 +02:00
parent 0e1d98963c
commit 06bf0fd6a3
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
mes/module/mes/scm.mes
View file

@ -368,6 +368,12 @@
(lambda args
(not (apply proc args))))
(define ceil identity)
(define floor identity)
(define round identity)
(define inexact->exact identity)
(define exact->inexact identity)
(define (const . rest)
(lambda (. _)
(car rest)))