d01               966 src/dps8/fnpuv.c     uint d01   = (d1 >> 30) & 017;
d01               985 src/dps8/fnpuv.c     uint oct1  = d01 * 100 + d02 * 10 + d03;