maybe T (\x => bitsToNatLe x = n) $ natToBitsLe k n