summaryrefslogtreecommitdiffstats
path: root/array.scm
diff options
context:
space:
mode:
authorBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:38 -0800
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:38 -0800
commit64f037d91e0c9296dcaef9a0ff3eb33b19a2ed34 (patch)
tree1b23b8e8005328194e2fb4bf653806c85050933f /array.scm
parent5bea21e81ed516440e34e480f2c33ca41aa8c597 (diff)
downloadslib-64f037d91e0c9296dcaef9a0ff3eb33b19a2ed34.tar.gz
slib-64f037d91e0c9296dcaef9a0ff3eb33b19a2ed34.zip
Import Upstream version 3a5upstream/3a5
Diffstat (limited to 'array.scm')
-rw-r--r--array.scm106
1 files changed, 63 insertions, 43 deletions
diff --git a/array.scm b/array.scm
index ff05fd0..4cf93b3 100644
--- a/array.scm
+++ b/array.scm
@@ -400,96 +400,116 @@
((or (zero? num) (negative? n))
(zero? num))))))
-;;@args z
-;;@args
+;;@defun A:floC128b z
+;;@defunx A:floC128b
;;Returns an inexact 128.bit flonum complex uniform-array prototype.
+;;@end defun
(define A:floC128b (make-prototype-checker 'A:floC128b complex? vector))
-;;@args z
-;;@args
+;;@defun A:floC64b z
+;;@defunx A:floC64b
;;Returns an inexact 64.bit flonum complex uniform-array prototype.
+;;@end defun
(define A:floC64b (make-prototype-checker 'A:floC64b complex? vector))
-;;@args z
-;;@args
+;;@defun A:floC32b z
+;;@defunx A:floC32b
;;Returns an inexact 32.bit flonum complex uniform-array prototype.
+;;@end defun
(define A:floC32b (make-prototype-checker 'A:floC32b complex? vector))
-;;@args z
-;;@args
+;;@defun A:floC16b z
+;;@defunx A:floC16b
;;Returns an inexact 16.bit flonum complex uniform-array prototype.
+;;@end defun
(define A:floC16b (make-prototype-checker 'A:floC16b complex? vector))
-;;@args z
-;;@args
+;;@defun A:floR128b x
+;;@defunx A:floR128b
;;Returns an inexact 128.bit flonum real uniform-array prototype.
+;;@end defun
(define A:floR128b (make-prototype-checker 'A:floR128b real? vector))
-;;@args z
-;;@args
+;;@defun A:floR64b x
+;;@defunx A:floR64b
;;Returns an inexact 64.bit flonum real uniform-array prototype.
+;;@end defun
(define A:floR64b (make-prototype-checker 'A:floR64b real? vector))
-;;@args z
-;;@args
+;;@defun A:floR32b x
+;;@defunx A:floR32b
;;Returns an inexact 32.bit flonum real uniform-array prototype.
+;;@end defun
(define A:floR32b (make-prototype-checker 'A:floR32b real? vector))
-;;@args z
-;;@args
+;;@defun A:floR16b x
+;;@defunx A:floR16b
;;Returns an inexact 16.bit flonum real uniform-array prototype.
+;;@end defun
(define A:floR16b (make-prototype-checker 'A:floR16b real? vector))
-;;@args z
-;;@args
+;;@defun A:floR128d q
+;;@defunx A:floR128d
;;Returns an exact 128.bit decimal flonum rational uniform-array prototype.
-(define A:floR128b (make-prototype-checker 'A:floR128b real? vector))
-;;@args z
-;;@args
+;;@end defun
+(define A:floR128d (make-prototype-checker 'A:floR128d real? vector))
+;;@defun A:floR64d q
+;;@defunx A:floR64d
;;Returns an exact 64.bit decimal flonum rational uniform-array prototype.
-(define A:floR64b (make-prototype-checker 'A:floR64b real? vector))
-;;@args z
-;;@args
+;;@end defun
+(define A:floR64d (make-prototype-checker 'A:floR64d real? vector))
+;;@defun A:floR32d q
+;;@defunx A:floR32d
;;Returns an exact 32.bit decimal flonum rational uniform-array prototype.
-(define A:floR32b (make-prototype-checker 'A:floR32b real? vector))
+;;@end defun
+(define A:floR32d (make-prototype-checker 'A:floR32d real? vector))
-;;@args n
-;;@args
+;;@defun A:fixZ64b n
+;;@defunx A:fixZ64b
;;Returns an exact binary fixnum uniform-array prototype with at least
;;64 bits of precision.
+;;@end defun
(define A:fixZ64b (make-prototype-checker 'A:fixZ64b (integer-bytes?? -8) vector))
-;;@args n
-;;@args
+;;@defun A:fixZ32b n
+;;@defunx A:fixZ32b
;;Returns an exact binary fixnum uniform-array prototype with at least
;;32 bits of precision.
+;;@end defun
(define A:fixZ32b (make-prototype-checker 'A:fixZ32b (integer-bytes?? -4) vector))
-;;@args n
-;;@args
+;;@defun A:fixZ16b n
+;;@defunx A:fixZ16b
;;Returns an exact binary fixnum uniform-array prototype with at least
;;16 bits of precision.
+;;@end defun
(define A:fixZ16b (make-prototype-checker 'A:fixZ16b (integer-bytes?? -2) vector))
-;;@args n
-;;@args
+;;@defun A:fixZ8b n
+;;@defunx A:fixZ8b
;;Returns an exact binary fixnum uniform-array prototype with at least
;;8 bits of precision.
+;;@end defun
(define A:fixZ8b (make-prototype-checker 'A:fixZ8b (integer-bytes?? -1) vector))
-;;@args k
-;;@args
+;;@defun A:fixN64b k
+;;@defunx A:fixN64b
;;Returns an exact non-negative binary fixnum uniform-array prototype with at
;;least 64 bits of precision.
+;;@end defun
(define A:fixN64b (make-prototype-checker 'A:fixN64b (integer-bytes?? 8) vector))
-;;@args k
-;;@args
+;;@defun A:fixN32b k
+;;@defunx A:fixN32b
;;Returns an exact non-negative binary fixnum uniform-array prototype with at
;;least 32 bits of precision.
+;;@end defun
(define A:fixN32b (make-prototype-checker 'A:fixN32b (integer-bytes?? 4) vector))
-;;@args k
-;;@args
+;;@defun A:fixN16b k
+;;@defunx A:fixN16b
;;Returns an exact non-negative binary fixnum uniform-array prototype with at
;;least 16 bits of precision.
+;;@end defun
(define A:fixN16b (make-prototype-checker 'A:fixN16b (integer-bytes?? 2) vector))
-;;@args k
-;;@args
+;;@defun A:fixN8b k
+;;@defunx A:fixN8b
;;Returns an exact non-negative binary fixnum uniform-array prototype with at
;;least 8 bits of precision.
+;;@end defun
(define A:fixN8b (make-prototype-checker 'A:fixN8b (integer-bytes?? 1) vector))
-;;@args bool
-;;@args
+;;@defun A:bool bool
+;;@defunx A:bool
;;Returns a boolean uniform-array prototype.
+;;@end defun
(define A:bool (make-prototype-checker 'A:bool boolean? vector))