;+ ;FUNCTION: nibble ;PURPOSE: ; Converts a byte into an 8-element byte array where the elements are ; the individual bits (0 or 1). LSB is stored in element 0 and MSB is ; in element 7. Note: if this function is fed an integer or a long, ; then it processes only the least significant byte without crashing. ; No error checking for maximum speed. ;USAGE: ; bits = nibble(byte) ;INPUTS: ; byte : A byte scalar. ;KEYWORDS: ;CREATED BY: David L. Mitchell 01-15-98 ;FILE: nibble.pro ;VERSION: 1.2 ;LAST MODIFICATION: 01-31-98 ;- function nibble, byte return, ishft(byte,-indgen(8)) mod 2B end