• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
          • *vl-1-bit-approx-mux*
          • *vl-1-bit-mux*
          • Nedgeflop
          • Vl-primitive-mkport
          • *vl-1-bit-assign*
          • *vl-1-bit-zmux*
          • Vl-primitive-mkwire
            • *vl-1-bit-bufif1*
            • *vl-1-bit-bufif0*
            • *vl-1-bit-delay-1*
            • *vl-1-bit-ceq*
            • *vl-1-bit-buf*
            • *vl-1-bit-rcmos*
            • *vl-1-bit-latch*
            • *vl-1-bit-cmos*
            • *vl-1-bit-power*
            • *vl-1-bit-rpmos*
            • *vl-1-bit-rnmos*
            • *vl-1-bit-pmos*
            • *vl-1-bit-nmos*
            • *vl-1-bit-ground*
            • *vl-1-bit-tranif1*
            • *vl-1-bit-tranif0*
            • *vl-1-bit-rtranif1*
            • *vl-1-bit-rtranif0*
            • *vl-1-bit-rtran*
            • *vl-1-bit-tran*
            • *vl-1-bit-notif1*
            • *vl-1-bit-notif0*
            • *vl-1-bit-and*
            • *vl-1-bit-xor*
            • *vl-1-bit-xnor*
            • *vl-1-bit-pullup*
            • *vl-1-bit-pulldown*
            • *vl-1-bit-or*
            • *vl-1-bit-not*
            • *vl-1-bit-nor*
            • *vl-1-bit-nand*
            • *vl-1-bit-z*
            • *vl-1-bit-x*
            • *vl-1-bit-t*
            • *vl-1-bit-f*
          • Use-set
          • Syntax
          • Getting-started
          • Utilities
          • Loader
          • Transforms
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Primitives

    Vl-primitive-mkwire

    Convenient way to generate an internal wire for a primitive.

    Signature
    (vl-primitive-mkwire name) → (mv expr vardecl)
    Arguments
    name — Guard (stringp name).
    Returns
    expr — Type (vl-expr-p expr).
    vardecl — Type (vl-vardecl-p vardecl).

    This is similar to vl-occform-mkwire, but our primitives are all one-bit things so we leave out the ranges to make them prettier.

    Definitions and Theorems

    Function: vl-primitive-mkwire

    (defun vl-primitive-mkwire (name)
      (declare (xargs :guard (stringp name)))
      (let ((__function__ 'vl-primitive-mkwire))
        (declare (ignorable __function__))
        (b* ((name (hons-copy (string-fix name)))
             (expr (vl-idexpr name 1 :vl-unsigned))
             (vardecl (make-vl-vardecl :name name
                                       :type *vl-plain-old-wire-type*
                                       :nettype :vl-wire
                                       :loc *vl-fakeloc*)))
          (mv expr vardecl))))

    Theorem: vl-expr-p-of-vl-primitive-mkwire.expr

    (defthm vl-expr-p-of-vl-primitive-mkwire.expr
      (b* (((mv ?expr ?vardecl)
            (vl-primitive-mkwire name)))
        (vl-expr-p expr))
      :rule-classes :rewrite)

    Theorem: vl-vardecl-p-of-vl-primitive-mkwire.vardecl

    (defthm vl-vardecl-p-of-vl-primitive-mkwire.vardecl
      (b* (((mv ?expr ?vardecl)
            (vl-primitive-mkwire name)))
        (vl-vardecl-p vardecl))
      :rule-classes :rewrite)

    Theorem: vl-primitive-mkwire-of-str-fix-name

    (defthm vl-primitive-mkwire-of-str-fix-name
      (equal (vl-primitive-mkwire (str-fix name))
             (vl-primitive-mkwire name)))

    Theorem: vl-primitive-mkwire-streqv-congruence-on-name

    (defthm vl-primitive-mkwire-streqv-congruence-on-name
      (implies (streqv name name-equiv)
               (equal (vl-primitive-mkwire name)
                      (vl-primitive-mkwire name-equiv)))
      :rule-classes :congruence)