conservatory
/
ikarus
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* exported even?

This commit is contained in:
Abdulaziz Ghuloum 2007-06-13 13:01:21 +03:00
parent 6441235594
commit 9b0d2143a3
3 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
src/ikarus.boot
View File

Binary file not shown.

4
src/ikarus.numerics.ss
View File

@ -98,7 +98,7 @@
(library (ikarus generic-arithmetic) (library (ikarus generic-arithmetic)
(export + - * / zero? = < <= > >= add1 sub1 quotient remainder (export + - * / zero? = < <= > >= add1 sub1 quotient remainder
modulo modulo even?
positive? expt gcd lcm numerator denominator exact-integer-sqrt positive? expt gcd lcm numerator denominator exact-integer-sqrt
quotient+remainder number->string string->number min max quotient+remainder number->string string->number min max
exact->inexact floor ceiling round log fl=? fl<? fl<=? fl>? exact->inexact floor ceiling round log fl=? fl<? fl<=? fl>?
@ -112,7 +112,7 @@
(ikarus system $strings) (ikarus system $strings)
(only (ikarus flonums) $flonum->exact) (only (ikarus flonums) $flonum->exact)
(except (ikarus) + - * / zero? = < <= > >= add1 sub1 quotient (except (ikarus) + - * / zero? = < <= > >= add1 sub1 quotient
remainder modulo quotient+remainder number->string positive? remainder modulo even? quotient+remainder number->string positive?
string->number expt gcd lcm numerator denominator string->number expt gcd lcm numerator denominator
exact->inexact floor ceiling round log exact->inexact floor ceiling round log
exact-integer-sqrt min max exact-integer-sqrt min max

1
src/makefile.ss
View File

@ -397,6 +397,7 @@
[rational? i r] [rational? i r]
[flonum? i] [flonum? i]
[positive? i r] [positive? i r]
[even? i r]
[quotient i r] [quotient i r]
[modulo i r] [modulo i r]
[remainder i r] [remainder i r]