Import Upstream version 3a3upstream/3a3

1 files changed, 0 insertions, 28 deletions

diff --git a/phil-spc.txi b/phil-spc.txi
index ac1743c..62b1bae 100644
--- a/phil-spc.txi
+++ b/phil-spc.txi
@@ -110,34 +110,6 @@ corresponding predicate of @var{k1} and @var{k2}.
 @cindex lamination
 
 
-@defun bitwise-laminate k1 @dots{}
-@defunx bitwise-delaminate count k
-
-Returns an integer composed of the bits of @var{k1} @dots{} interlaced
-in argument order.  Given @var{k1}, @dots{} @var{kn}, the n low-order
-bits of the returned value will be the lowest-order bit of each
-argument.
-
-
-@defunx bitwise-laminate count k
-Returns a list of @var{count} integers comprised of every @var{count}h
-bit of the integer @var{k}.
-
-@example
-(map (lambda (k) (number->string k 2))
-     (bitwise-delaminate 4 #x7654))
-    @result{} ("0" "1111" "1100" "1010")
-(number->string (bitwise-laminate 0 #b1111 #b1100 #b1010) 16)
-    @result{} "7654"
-@end example
-
-For any non-negative integers @var{k} and @var{count}:
-@example
-(eqv? k (bitwise-laminate (bitwise-delaminate count k)))
-@end example
-@end defun
-
-
 @defun delaminate-list count ks