• 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
        • Running-linux
        • Introduction
        • Asmtest
        • X86isa-build-instructions
        • Publications
        • Contributors
        • Machine
          • X86isa-state
          • Syscalls
          • Cpuid
          • Linear-memory
          • Rflag-specifications
          • Characterizing-undefined-behavior
            • Undef-read
              • Unsafe-!undef
              • Undef-read-logic
            • Top-level-memory
            • App-view
            • X86-decoder
            • 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
    • Undef-read

    Undef-read-logic

    Signature
    (undef-read-logic x86) → (mv unknown x86)
    Returns
    unknown — Type (natp unknown).
    x86 — Type (x86p x86), given (x86p x86).

    Definitions and Theorems

    Function: undef-read-logic

    (defun undef-read-logic (x86)
      (declare (xargs :stobjs (x86)))
      (declare (xargs :guard t))
      (let ((__function__ 'undef-read-logic))
        (declare (ignorable __function__))
        (b* ((undef-seed (nfix (undef x86)))
             (new-unknown (create-undef undef-seed))
             (x86 (!undef (1+ undef-seed) x86)))
          (mv new-unknown x86))))

    Theorem: natp-of-undef-read-logic.unknown

    (defthm natp-of-undef-read-logic.unknown
      (b* (((mv ?unknown ?x86)
            (undef-read-logic x86)))
        (natp unknown))
      :rule-classes :type-prescription)

    Theorem: x86p-of-undef-read-logic.x86

    (defthm x86p-of-undef-read-logic.x86
      (implies (x86p x86)
               (b* (((mv ?unknown ?x86)
                     (undef-read-logic x86)))
                 (x86p x86)))
      :rule-classes :rewrite)