#       INPUT           VAL             DESIRED OUTPUT
#       0bKKKK_KKKK     0b0000_0000     0bKKK0_K000
#       0bKKKK_KKKK     0b0000_0001     0bKKK0_K001
#       0bKKKK_KKKK     0b0000_0010     0bKKK0_K010
#       0bKKKK_KKKK     0b0000_0011     0bKKK0_K011
#       0bKKKK_KKKK     0b0000_0100     0bKKK0_K100
#       0bKKKK_KKKK     0b0000_0101     0bKKK0_K101
#       0bKKKK_KKKK     0b0000_0110     0bKKK0_K110
#       0bKKKK_KKKK     0b0000_0111     0bKKK0_K111
#       0bKKKK_KKKK     0b0000_1000     0bKKK1_K000
#       0bKKKK_KKKK     0b0000_1001     0bKKK1_K001
#       0bKKKK_KKKK     0b0000_1010     0bKKK1_K010
#       0bKKKK_KKKK     0b0000_1011     0bKKK1_K011
#       0bKKKK_KKKK     0b0000_1100     0bKKK1_K100
#       0bKKKK_KKKK     0b0000_1101     0bKKK1_K101
#       0bKKKK_KKKK     0b0000_1110     0bKKK1_K110
#       0bKKKK_KKKK     0b0000_1111     0bKKK1_K111
for (0 .. 15) {
    is( bit_set_skip( 0x00, [0,1,2,4], $_), (($_ & 0x08)<<1) | (($_ & 0x07)<<0), "put a gap between the MSB and the lower three bits");
}