Data _null_; n = 13;
NBITSON = Length (Compress (PUT (N, Binary32.), '0'));
Put n = n = binary32. NBITSON =;
X_chr = '100100100100'; x_val = INPUT (X_Chr, Binary32.); X_REV = INPUT (Reverse (x_val, binary32.), binary32.); x_inv = bnot (x_val); x_neg = -X_VAL;