• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Debugging
  • Projects
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
    • Sv
    • Vwsim
    • Fgl
    • Vl
      • Syntax
      • Loader
      • Warnings
      • Getting-started
      • Utilities
      • Printer
      • Kit
      • Mlib
      • Transforms
        • Unparameterization
        • Elaborate
        • Addnames
        • Annotate
          • Increment-elim
          • Make-implicit-wires
          • Basic-bind-elim
            • Vl-modulelist-apply-binddelta
            • Vl-interfacelist-apply-binddelta
            • Vl-bindelim-main
            • Vl-bindelim-bindlist
            • Vl-bindelim-find-global-target
            • Vl-interfacelist-bindelim
            • Vl-modulelist-bindelim
            • Vl-interface-bindelim
            • Vl-module-bindelim
            • Vl-bindelim-institem
            • Vl-warn-bindintentlist-undefined
            • Vl-warn-bindintent-undefined
            • Vl-interfacelist-bindelim-insttable
            • Vl-modulelist-bindelim-insttable
            • Vl-warn-binddelta-undefined
            • Vl-interface-bindelim-insttable
            • Vl-interface-apply-binddelta
            • Vl-design-bindelim-pass2
            • Vl-bindelim-modinstlist-add-atts
            • Vl-module-bindelim-insttable
            • Vl-module-apply-binddelta
            • Vl-bindelim-modinst-add-atts
            • Vl-design-bindelim-pass1
            • Vl-bindcontext
            • Vl-bindintent->modinsts
            • Vl-bindelim-insttable
            • Vl-bindintentlist->modinsts
            • Vl-binddelta
            • Vl-design-bindelim
            • Vl-bindelim-institemlist
          • Argresolve
          • Basicsanity
          • Portdecl-sign
          • Enum-names
          • Port-resolve
          • Udp-elim
          • Vl-annotate-design
          • Vl-annotate-module
        • Clean-warnings
        • Eliminitial
        • Custom-transform-hooks
        • Problem-modules
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Basic-bind-elim

Vl-bindelim-modinst-add-atts

Signature

(vl-bindelim-modinst-add-atts x intent) → new-x

Arguments

x — Guard (vl-modinst-p x).

intent — Guard (vl-bindintent-p intent).

Returns

new-x — Type (vl-modinst-p new-x).

Definitions and Theorems

Function: vl-bindelim-modinst-add-atts

(defun vl-bindelim-modinst-add-atts (x intent)
 (declare (xargs :guard (and (vl-modinst-p x)
                             (vl-bindintent-p intent))))
 (let ((__function__ 'vl-bindelim-modinst-add-atts))
  (declare (ignorable __function__))
  (b*
   (((vl-modinst x))
    ((vl-bindintent intent))
    (val (cat "Added by bind statement from "
              (vl-bindcontext->shortdescription intent.ctx)
              " at "
              (vl-location-string (vl-bind->loc intent.source))))
    (atts
     (cons (cons "VL_FROM_BIND"
                 (make-vl-literal :val (make-vl-string :value val)))
           x.atts)))
   (change-vl-modinst x :atts atts))))

Theorem: vl-modinst-p-of-vl-bindelim-modinst-add-atts

(defthm vl-modinst-p-of-vl-bindelim-modinst-add-atts
  (b* ((new-x (vl-bindelim-modinst-add-atts x intent)))
    (vl-modinst-p new-x))
  :rule-classes :rewrite)

Theorem: vl-bindelim-modinst-add-atts-of-vl-modinst-fix-x

(defthm vl-bindelim-modinst-add-atts-of-vl-modinst-fix-x
  (equal (vl-bindelim-modinst-add-atts (vl-modinst-fix x)
                                       intent)
         (vl-bindelim-modinst-add-atts x intent)))

Theorem: vl-bindelim-modinst-add-atts-vl-modinst-equiv-congruence-on-x

(defthm
      vl-bindelim-modinst-add-atts-vl-modinst-equiv-congruence-on-x
  (implies (vl-modinst-equiv x x-equiv)
           (equal (vl-bindelim-modinst-add-atts x intent)
                  (vl-bindelim-modinst-add-atts x-equiv intent)))
  :rule-classes :congruence)

Theorem: vl-bindelim-modinst-add-atts-of-vl-bindintent-fix-intent

(defthm vl-bindelim-modinst-add-atts-of-vl-bindintent-fix-intent
  (equal (vl-bindelim-modinst-add-atts x (vl-bindintent-fix intent))
         (vl-bindelim-modinst-add-atts x intent)))

Theorem: vl-bindelim-modinst-add-atts-vl-bindintent-equiv-congruence-on-intent

(defthm
 vl-bindelim-modinst-add-atts-vl-bindintent-equiv-congruence-on-intent
 (implies (vl-bindintent-equiv intent intent-equiv)
          (equal (vl-bindelim-modinst-add-atts x intent)
                 (vl-bindelim-modinst-add-atts x intent-equiv)))
 :rule-classes :congruence)