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