• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • Vl
        • Syntax
        • Loader
        • Warnings
        • Getting-started
        • Utilities
        • Printer
        • Kit
        • Mlib
        • Transforms
          • Unparameterization
          • Elaborate
          • Addnames
          • Annotate
            • Increment-elim
            • Make-implicit-wires
            • Basic-bind-elim
            • Argresolve
            • Basicsanity
            • Portdecl-sign
              • Vl-modulelist-portdecl-sign
              • Vl-portdecl-sign-list
              • Vl-portdecl-sign-1
              • Vl-portdecl-sign-main
              • Vl-portdecl-type-set-signed
              • Vl-module-portdecl-sign
              • Vl-design-portdecl-sign
                • Vl-datatype->signedp
              • 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
    • Portdecl-sign

    Vl-design-portdecl-sign

    Signature
    (vl-design-portdecl-sign x) → new-x
    Arguments
    x — Guard (vl-design-p x).
    Returns
    new-x — Type (vl-design-p new-x).

    Definitions and Theorems

    Function: vl-design-portdecl-sign

    (defun vl-design-portdecl-sign (x)
     (declare (xargs :guard (vl-design-p x)))
     (let ((__function__ 'vl-design-portdecl-sign))
      (declare (ignorable __function__))
      (b* (((vl-design x)))
        (change-vl-design x
                          :mods (vl-modulelist-portdecl-sign x.mods)))))

    Theorem: vl-design-p-of-vl-design-portdecl-sign

    (defthm vl-design-p-of-vl-design-portdecl-sign
      (b* ((new-x (vl-design-portdecl-sign x)))
        (vl-design-p new-x))
      :rule-classes :rewrite)

    Theorem: vl-design-portdecl-sign-of-vl-design-fix-x

    (defthm vl-design-portdecl-sign-of-vl-design-fix-x
      (equal (vl-design-portdecl-sign (vl-design-fix x))
             (vl-design-portdecl-sign x)))

    Theorem: vl-design-portdecl-sign-vl-design-equiv-congruence-on-x

    (defthm vl-design-portdecl-sign-vl-design-equiv-congruence-on-x
      (implies (vl-design-equiv x x-equiv)
               (equal (vl-design-portdecl-sign x)
                      (vl-design-portdecl-sign x-equiv)))
      :rule-classes :congruence)