;;; -*- Mode:LISP; Package:SIM; Readtable:CL; Base:10 -*-

(defconst %%i-opcode (byte 8 0))
(defconst %%i-src-1-offset (byte 5 0))
(defconst %%i-src-1-base (byte