- copy-bit index from bitprocedure
Returns an integer the same as from except in the indexth bit, which is 1 if bit is #t and 0 if bit is #f.
Example:
(number->string (copy-bit 0 0 #t) 2) ; => "1" (number->string (copy-bit 2 0 #t) 2) ; => "100" (number->string (copy-bit 2 #b1111 #f) 2) ; => "1011"