• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
      • Apt
      • Zfc
      • Acre
      • Milawa
      • Smtlink
      • Abnf
      • Vwsim
      • Isar
      • Wp-gen
      • Dimacs-reader
      • Pfcs
      • Legacy-defrstobj
      • Proof-checker-array
      • Soft
      • C
      • Farray
      • Rp-rewriter
      • Instant-runoff-voting
      • Imp-language
      • Sidekick
      • Leftist-trees
      • Java
      • Taspi
      • Bitcoin
      • Riscv
        • Instructions
        • States
          • Stat
          • Stat-validp
          • Write-memory-unsigned64
          • Write-memory-unsigned32
          • Write-memory-unsigned8
          • Write-memory-unsigned16
          • Read-xreg-unsigned
          • Write-xreg-32
          • States64
          • Write-xreg
          • Read-memory-unsigned8
          • Read-memory-unsigned64
          • Read-memory-unsigned32
          • Read-memory-unsigned16
          • Read-xreg-signed
          • Read-xreg-unsigned32
          • States32
            • Write32-xreg
            • Xregfile32
            • Write32-mem-ubyte16-lendian
            • State32
            • Memory32
              • Memory32p
              • Memory32-fix
              • Write32-mem-ubyte32-lendian
              • Write32-pc
              • Write32-mem-ubyte8
              • Read32-mem-ubyte16-lendian
              • Read32-xreg-unsigned
              • Read32-mem-ubyte8
              • Read32-mem-ubyte32-lendian
              • Read32-xreg-signed
              • Inc32-pc
              • Read32-pc
              • Error32p
              • Error32
              • *mem32-size*
            • Write-pc
            • Read-xreg-signed32
            • Read-pc
            • Inc4-pc
          • Decoding
          • Encoding
          • Features
          • Semantics
          • Execution
        • Des
        • Ethereum
        • X86isa
        • Sha-2
        • Yul
        • Zcash
        • Proof-checker-itp13
        • Regex
        • ACL2-programming-language
        • Json
        • Jfkr
        • Equational
        • Cryptography
        • Poseidon
        • Where-do-i-place-my-book
        • Axe
        • Bigmems
        • Builtins
        • Execloader
        • Aleo
        • Solidity
        • Paco
        • Concurrent-programs
        • Bls12-377-curves
      • Debugging
      • Std
      • Proof-automation
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Memory32

    Memory32-fix

    Fixer for memory32.

    Signature
    (memory32-fix x) → *
    Arguments
    x — Guard (memory32p x).

    Definitions and Theorems

    Function: memory32-fix

    (defun memory32-fix (x)
      (declare (xargs :guard (memory32p x)))
      (mbe :logic
           (if (memory32p x)
               x
             (acl2::ubyte8-list-fix (take 4294967296 x)))
           :exec x))

    Theorem: memory32p-of-memory32-fix

    (defthm memory32p-of-memory32-fix
      (memory32p (memory32-fix x)))

    Theorem: memory32-fix-when-memory32p

    (defthm memory32-fix-when-memory32p
      (implies (memory32p x)
               (equal (memory32-fix x) x)))