• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
    • Kestrel-books
    • X86isa
      • Program-execution
      • Sdm-instruction-set-summary
      • Tlb
      • Booting-linux
      • Introduction
      • Asmtest
      • X86isa-build-instructions
      • Publications
      • Contributors
      • Machine
        • X86isa-state
        • Syscalls
        • Cpuid
        • Linear-memory
        • Rflag-specifications
        • Characterizing-undefined-behavior
        • Top-level-memory
        • App-view
        • X86-decoder
          • Get-prefixes
          • Vex-0f3a-execute
          • Vex-0f38-execute
          • Vex-0f-execute
          • Two-byte-opcode-execute
          • Second-three-byte-opcode-execute
          • One-byte-opcode-execute
          • First-three-byte-opcode-execute
          • Evex-0f3a-execute
          • Evex-0f38-execute
          • Evex-0f-execute
          • X86-fetch-decode-execute
          • Vex-decode-and-execute
          • Evex-decode-and-execute
          • X86-run
          • Implemented-opcodes
          • Three-byte-opcode-decode-and-execute
          • X86-run-halt-count
          • Two-byte-opcode-decode-and-execute
          • X86-run-steps
          • Opcode-maps
          • X86-run-halt
          • X86-fetch-decode-execute-halt
          • X86-run-steps1
        • Physical-memory
        • Decoding-and-spec-utils
        • Instructions
        • Register-readers-and-writers
        • X86-modes
        • Segmentation
        • Other-non-deterministic-computations
        • Environment
        • Paging
      • Implemented-opcodes
      • To-do
      • Proof-utilities
      • Peripherals
      • Model-validation
      • Modelcalls
      • Concrete-simulation-examples
      • Utils
      • Debugging-code-proofs
    • Axe
    • Execloader
  • Math
  • Testing-utilities

• X86-decoder

Evex-0f38-execute

Dispatch function for EVEX-encoded instructions in the first three-byte opcode map

Signature

(evex-0f38-execute proc-mode 
                   start-rip temp-rip prefixes rex-byte 
                   evex-prefixes opcode modr/m sib x86) 
 
  → 
x86

Arguments

temp-rip — temp-rip points to the byte following the opcode byte.

evex-prefixes — Completely populated when this function is called.

Returns

x86 — Type (x86p x86), given (x86p x86).

Definitions and Theorems

Function: evex-0f38-execute

(defun evex-0f38-execute
       (proc-mode start-rip temp-rip prefixes rex-byte
                  evex-prefixes opcode modr/m sib x86)
 (declare (xargs :stobjs (x86)))
 (declare (type (integer 0 4) proc-mode)
          (type (signed-byte 48) start-rip)
          (type (signed-byte 48) temp-rip)
          (type (unsigned-byte 52) prefixes)
          (type (unsigned-byte 8) rex-byte)
          (type (unsigned-byte 32) evex-prefixes)
          (type (unsigned-byte 8) opcode)
          (type (unsigned-byte 8) modr/m)
          (type (unsigned-byte 8) sib))
 (declare (xargs :guard (and (evex-prefixes-p evex-prefixes)
                             (modr/m-p modr/m)
                             (sib-p sib))))
 (case opcode
  (0
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (1 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (2 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (3 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (4
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (5 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (6 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (7 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (8 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (9 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                       start-rip temp-rip x86))))
  (10 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (11
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (12
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (13
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (14 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (15 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (16
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6nf (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (17
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (18
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (19
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e11 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e11 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e11 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (20
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (21
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (22
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (23 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (24
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (25
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (26
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (27
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (28
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (29
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (30
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (31
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (32
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6nf (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e5 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (33
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (34
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (35
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (36
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (37
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (38
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512f :avx512bw)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512f :avx512bw))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512f :avx512bw)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512f :avx512bw))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (39
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (40
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (41
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (42
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e1nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e1nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e1nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6nf (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (43
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4nf (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (44
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (45
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (46 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (47 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (48
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6nf (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e5 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (49
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (50
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (51
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (52
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (53
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e5 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e5 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (54
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (55
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (56
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (57
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e7nm (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e7nm (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (58
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e6nf (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 2)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6nf (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (59
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (60
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (61
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (62
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (63
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (64
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (65 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                        start-rip temp-rip x86))))
  (66
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (67
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (68
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (69
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (70
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (71
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (76
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (77
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e10 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e10 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (78
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (79
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e10 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e10 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (82
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 3)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512_4vnniw)))))
          (or chk-ex
              (if (or (equal (feature-flags-macro '(:avx512_4vnniw))
                             0))
                  ':ud
                nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (83
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 3)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512_4vnniw)))))
          (or chk-ex
              (if (or (equal (feature-flags-macro '(:avx512_4vnniw))
                             0))
                  ':ud
                nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (88
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (89
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (90
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512dq)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512dq))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (91
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512dq)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512dq))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (100
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (101
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (102
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (117
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
             (or (chk-exc :type-e4nf.nb (:avx512vl :avx512_vbmi)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512vl :avx512_vbmi))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
             (or (chk-exc :type-e4nf.nb (:avx512vl :avx512_vbmi)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512vl :avx512_vbmi))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
         (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512_vbmi)))))
           (or chk-ex
               (if (or (equal (feature-flags-macro '(:avx512_vbmi))
                              0))
                   ':ud
                 nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (118
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (119
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (120
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (121
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (122
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (123
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e6 (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (124
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e6 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e6 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (125
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
             (or (chk-exc :type-e4nf.nb (:avx512vl :avx512_vbmi)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512vl :avx512_vbmi))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
             (or (chk-exc :type-e4nf.nb (:avx512vl :avx512_vbmi)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512vl :avx512_vbmi))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
         (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512_vbmi)))))
           (or chk-ex
               (if (or (equal (feature-flags-macro '(:avx512_vbmi))
                              0))
                   ':ud
                 nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (126
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (127
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
          ((chk-ex (or (chk-exc :type-e4nf (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4nf (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (131
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf (:avx512_vbmi :avx512vl)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512_vbmi :avx512vl))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf (:avx512_vbmi :avx512vl)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512_vbmi :avx512vl))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
          (let ((chk-ex (or (chk-exc :type-e4nf (:avx512_vbmi)))))
            (or chk-ex
                (if (or (equal (feature-flags-macro '(:avx512_vbmi))
                               0))
                    ':ud
                  nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (136
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (137
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (138
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (139
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4.nb (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e4.nb (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (140 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (141
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
             (or (chk-exc :type-e4nf.nb (:avx512vl :avx512_vbmi)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512vl :avx512_vbmi))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
             (or (chk-exc :type-e4nf.nb (:avx512vl :avx512_vbmi)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512vl :avx512_vbmi))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
         (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512_vbmi)))))
           (or chk-ex
               (if (or (equal (feature-flags-macro '(:avx512_vbmi))
                              0))
                   ':ud
                 nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex
               (or (chk-exc :type-e4nf.nb (:avx512vl :avx512bw)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512bw))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4nf.nb (:avx512bw)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512bw))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (142 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (144
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (145
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (146
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (147
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (150
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (151
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (152
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (153
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (154
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 3)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512_4fmaps)))))
          (or chk-ex
              (if (or (equal (feature-flags-macro '(:avx512_4fmaps))
                             0))
                  ':ud
                nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (155
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 3)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e3 (:avx512_4fmaps)))))
          (or chk-ex
              (if (or (equal (feature-flags-macro '(:avx512_4fmaps))
                             0))
                  ':ud
                nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (156
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (157
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (158
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (159
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (160
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (161
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (162
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (163
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e12 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (166
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (167
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (168
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (169
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (170
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 3)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512_4fmaps)))))
          (or chk-ex
              (if (or (equal (feature-flags-macro '(:avx512_4fmaps))
                             0))
                  ':ud
                nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (171
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 3)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e3 (:avx512_4fmaps)))))
          (or chk-ex
              (if (or (equal (feature-flags-macro '(:avx512_4fmaps))
                             0))
                  ':ud
                nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (172
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (173
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (174
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (175
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (180
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4 (:avx512_ifma :avx512vl)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512_ifma :avx512vl))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4 (:avx512_ifma :avx512vl)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512_ifma :avx512vl))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
          (let ((chk-ex (or (chk-exc :type-e4 (:avx512_ifma)))))
            (or chk-ex
                (if (or (equal (feature-flags-macro '(:avx512_ifma))
                               0))
                    ':ud
                  nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (181
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4 (:avx512_ifma :avx512vl)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512_ifma :avx512vl))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
         ((chk-ex (or (chk-exc :type-e4 (:avx512_ifma :avx512vl)))))
         (or
          chk-ex
          (if
           (or
              (equal (feature-flags-macro '(:avx512_ifma :avx512vl))
                     0))
           ':ud
           nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
          (let ((chk-ex (or (chk-exc :type-e4 (:avx512_ifma)))))
            (or chk-ex
                (if (or (equal (feature-flags-macro '(:avx512_ifma))
                               0))
                    ':ud
                  nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (182
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (183
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (184
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (185
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (186
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (187
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (188
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (189
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (190
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let ((chk-ex (or (chk-exc :type-e2 (:avx512vl :avx512f)))))
         (or
          chk-ex
          (if (or (equal (feature-flags-macro '(:avx512vl :avx512f))
                         0))
              ':ud
            nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (191
   (cond
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                    (equal (evex->v-prime evex-prefixes)
                           1)))
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512f)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512f))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (196
   (cond
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 0)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 0)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 1)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
        (let
           ((chk-ex (or (chk-exc :type-e4 (:avx512vl :avx512cd)))))
         (or
           chk-ex
           (if
             (or (equal (feature-flags-macro '(:avx512vl :avx512cd))
                        0))
             ':ud
             nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    ((and (and (equal (evex->vvvv evex-prefixes) 15)
               (equal (evex->v-prime evex-prefixes) 1))
          (equal (evex->vl/rc evex-prefixes) 2)
          (equal (evex->pp evex-prefixes) 1)
          (equal (evex->w evex-prefixes) 1)
          't)
     (let
      ((fault-var
            (let ((chk-ex (or (chk-exc :type-e4 (:avx512cd)))))
              (or chk-ex
                  (if (or (equal (feature-flags-macro '(:avx512cd))
                                 0))
                      ':ud
                    nil)))))
      (if fault-var
          (case fault-var
            (:ud (x86-illegal-instruction "#UD Encountered!"
                                          start-rip temp-rip x86))
            (:gp (x86-general-protection "#GP Encountered!"
                                         start-rip temp-rip x86))
            (:nm (x86-device-not-available "#NM Encountered!"
                                           start-rip temp-rip x86))
            (t (x86-step-unimplemented
                    "Unimplemented exception in x86isa!"
                    x86)))
        (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                x86))))
    (t (x86-illegal-instruction "#UD Encountered!"
                                start-rip temp-rip x86))))
  (198
   (cond
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 1))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 1))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 2))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 2))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 5))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 5))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 6))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 6))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (199
   (cond
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 1))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 1))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 2))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 2))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 5))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 5))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           (equal (modr/m->reg modr/m) 6))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           (equal (modr/m->reg modr/m) 6))
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e12np (:avx512pf)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512pf))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (200
   (cond
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (202
   (cond
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (203
   (cond
     ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                     (equal (evex->v-prime evex-prefixes)
                            1)))
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                     (equal (evex->v-prime evex-prefixes)
                            1)))
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (204
   (cond
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (and (equal (evex->vvvv evex-prefixes) 15)
                (equal (evex->v-prime evex-prefixes) 1))
           (equal (evex->vl/rc evex-prefixes) 2)
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e2 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (205
   (cond
     ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                     (equal (evex->v-prime evex-prefixes)
                            1)))
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 1)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     ((and (not (and (equal (evex->vvvv evex-prefixes) 15)
                     (equal (evex->v-prime evex-prefixes)
                            1)))
           (equal (evex->pp evex-prefixes) 1)
           (equal (evex->w evex-prefixes) 0)
           't)
      (let
       ((fault-var
             (let ((chk-ex (or (chk-exc :type-e3 (:avx512er)))))
               (or chk-ex
                   (if (or (equal (feature-flags-macro '(:avx512er))
                                  0))
                       ':ud
                     nil)))))
       (if fault-var
           (case fault-var
             (:ud (x86-illegal-instruction "#UD Encountered!"
                                           start-rip temp-rip x86))
             (:gp (x86-general-protection "#GP Encountered!"
                                          start-rip temp-rip x86))
             (:nm (x86-device-not-available "#NM Encountered!"
                                            start-rip temp-rip x86))
             (t (x86-step-unimplemented
                     "Unimplemented exception in x86isa!"
                     x86)))
         (x86-step-unimplemented "Opcode Unimplemented in x86isa!"
                                 x86))))
     (t (x86-illegal-instruction "#UD Encountered!"
                                 start-rip temp-rip x86))))
  (219 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (220 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (221 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (222 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (223 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (242 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (243 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (245 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (246 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (247 (cond (t (x86-illegal-instruction "#UD Encountered!"
                                         start-rip temp-rip x86))))
  (t (x86-illegal-instruction "#UD Encountered!"
                              start-rip temp-rip x86))))

Theorem: x86p-of-evex-0f38-execute

(defthm x86p-of-evex-0f38-execute
 (implies
   (x86p x86)
   (b*
     ((x86 (evex-0f38-execute proc-mode
                              start-rip temp-rip prefixes rex-byte
                              evex-prefixes opcode modr/m sib x86)))
     (x86p x86)))
 :rule-classes :rewrite)