• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • 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
          • Top-level-memory
          • App-view
          • X86-decoder
          • Physical-memory
          • Decoding-and-spec-utils
          • Instructions
          • Register-readers-and-writers
            • Zmms-reads-and-writes
            • Gprs-reads-and-writes
            • Mmx-registers-reads-and-writes
            • Xmms-reads-and-writes
            • Rflags-reads-and-writes
            • Gpr-indices
            • Vex-vvvv-reg-index
            • Msr-reads-and-writes
            • Ctr-reads-and-writes
              • !ctri-write
              • !msra
                • Msra
            • 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
    • Ctr-reads-and-writes

    !msra

    Signature
    (!msra msr-addr val x86) → x86
    Arguments
    msr-addr — Guard (valid-msr-addr-p msr-addr).
    Returns
    x86 — Type (x86p x86), given (x86p x86).

    Definitions and Theorems

    Function: !msra

    (defun !msra (msr-addr val x86)
      (declare (xargs :stobjs (x86)))
      (declare (type (unsigned-byte 64) val))
      (declare (xargs :guard (valid-msr-addr-p msr-addr)))
      (let ((__function__ '!msra))
        (declare (ignorable __function__))
        (b* ((msr-index (msr-addr-to-index msr-addr)))
          (!msri msr-index val x86))))

    Theorem: x86p-of-!msra

    (defthm x86p-of-!msra
      (implies (x86p x86)
               (b* ((x86 (!msra msr-addr val x86)))
                 (x86p x86)))
      :rule-classes :rewrite)