• 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
        • Fgl
        • Vwsim
        • 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)