• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
    • Sv
      • Svex-stvs
      • Svex-decomposition-methodology
      • Sv-versus-esim
      • Svex-decomp
      • Svex-compose-dfs
      • Svex-compilation
      • Moddb
      • Svmods
      • Svstmt
      • Sv-tutorial
      • Expressions
        • Rewriting
        • Svex
        • Bit-blasting
        • Functions
        • 4vmask
        • Why-infinite-width
        • Svex-vars
        • Evaluation
          • Svex-xeval
          • Svex-mono-eval
          • Svex-eval
          • Svex-apply
          • Svex-env
          • Svex-alist-eval
          • Svar-boolmasks-lookup
          • Svex-s4eval
          • Svexlist-unquote
          • Svex-alist-eval-for-symbolic
          • Svexlist-eval
          • Svexlist-quotesp
          • Svar-boolmasks
          • Svexlist-s4eval
          • Svexlist-eval-for-symbolic
        • Values
      • Symbolic-test-vector
      • Vl-to-svex
    • Vwsim
    • Fgl
    • Vl
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Evaluation

Svar-boolmasks-lookup

Signature

(svar-boolmasks-lookup v boolmasks) → boolmask

Arguments

v — Guard (svar-p v).

boolmasks — Guard (svar-boolmasks-p boolmasks).

Returns

boolmask — Type (integerp boolmask).

Definitions and Theorems

Function: svar-boolmasks-lookup

(defun svar-boolmasks-lookup (v boolmasks)
  (declare (xargs :guard (and (svar-p v)
                              (svar-boolmasks-p boolmasks))))
  (let ((__function__ 'svar-boolmasks-lookup))
    (declare (ignorable __function__))
    (ifix (cdr (hons-get (mbe :logic (svar-fix v) :exec v)
                         boolmasks)))))

Theorem: integerp-of-svar-boolmasks-lookup

(defthm integerp-of-svar-boolmasks-lookup
  (b* ((boolmask (svar-boolmasks-lookup v boolmasks)))
    (integerp boolmask))
  :rule-classes :type-prescription)

Theorem: svar-boolmasks-lookup-of-svar-fix-v

(defthm svar-boolmasks-lookup-of-svar-fix-v
  (equal (svar-boolmasks-lookup (svar-fix v)
                                boolmasks)
         (svar-boolmasks-lookup v boolmasks)))

Theorem: svar-boolmasks-lookup-svar-equiv-congruence-on-v

(defthm svar-boolmasks-lookup-svar-equiv-congruence-on-v
  (implies (svar-equiv v v-equiv)
           (equal (svar-boolmasks-lookup v boolmasks)
                  (svar-boolmasks-lookup v-equiv boolmasks)))
  :rule-classes :congruence)

Theorem: svar-boolmasks-lookup-of-svar-boolmasks-fix-boolmasks

(defthm svar-boolmasks-lookup-of-svar-boolmasks-fix-boolmasks
  (equal (svar-boolmasks-lookup v (svar-boolmasks-fix boolmasks))
         (svar-boolmasks-lookup v boolmasks)))

Theorem: svar-boolmasks-lookup-svar-boolmasks-equiv-congruence-on-boolmasks

(defthm
 svar-boolmasks-lookup-svar-boolmasks-equiv-congruence-on-boolmasks
 (implies (svar-boolmasks-equiv boolmasks boolmasks-equiv)
          (equal (svar-boolmasks-lookup v boolmasks)
                 (svar-boolmasks-lookup v boolmasks-equiv)))
 :rule-classes :congruence)