• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • 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
          • Elabindex
          • Vl-override-parameter
          • Vl-genblob-elaborate
          • Vl-modelement-elaborate
          • Vl-design-elaborate-aux
          • Vl-package-elaborate-aux
          • Vl-taskdecl-elaborate
          • Vl-clkdecl-elaborate
          • Vl-defaultdisablelist-elaborate
          • Vl-modport-portlist-elaborate
          • Vl-modinst-elaborate-aux
          • Vl-maybe-parse-temps-elaborate
          • Vl-ansi-portdecllist-elaborate
          • Vl-ansi-portdecl-elaborate
          • Vl-parse-temps-elaborate
          • Vl-dpiimportlist-elaborate
          • Vl-clkassignlist-elaborate
          • Vl-cassertionlist-elaborate
          • Vl-assertionlist-elaborate
          • Vl-taskdecllist-elaborate
          • Vl-sequencelist-elaborate
          • Vl-propportlist-elaborate
          • Vl-propertylist-elaborate
          • Vl-plainarglist-elaborate
          • Vl-namedarglist-elaborate
          • Vl-maybe-clkskew-elaborate
          • Vl-gclkdecllist-elaborate
          • Vl-gateinstlist-elaborate
          • Vl-elabtasklist-elaborate
          • Vl-defaultdisable-elaborate
          • Vl-sequence-elaborate
          • Vl-property-elaborate
          • Vl-modportlist-elaborate
          • Vl-modport-port-elaborate
          • Vl-modinstlist-elaborate
          • Vl-letdecllist-elaborate
          • Vl-interfaceport-elaborate
          • Vl-initiallist-elaborate
          • Vl-gateinst-elaborate
          • Vl-fundecllist-elaborate
          • Vl-clkdecllist-elaborate
          • Vl-assignlist-elaborate
          • Vl-assign-elaborate-aux
          • Vl-arguments-elaborate
          • Vl-alwayslist-elaborate
          • Vl-regularport-elaborate
          • Vl-portlist-elaborate
          • Vl-finallist-elaborate
          • Vl-dpiimport-elaborate
          • Vl-clkassign-elaborate
          • Vl-bindlist-elaborate
          • Vl-aliaslist-elaborate
          • Vl-warn-about-negative-indices
          • Vl-udplist-elaborate
          • Vl-propport-elaborate
          • Vl-modinst-elaborate
          • Vl-udp-elaborate
          • Vl-port-elaborate
          • Vl-plainarg-elaborate
          • Vl-namedarg-elaborate
          • Vl-modport-elaborate
          • Vl-gclkdecl-elaborate
          • Vl-elabtask-elaborate
          • Vl-clkskew-elaborate
          • Vl-assign-elaborate
          • Vl-always-elaborate-aux
          • Vl-always-elaborate
          • Vl-alias-elaborate
          • Vl-initial-elaborate
          • Vl-bind-elaborate
          • Vl-final-elaborate
          • Vl-fundecl-paramdecls-for-const-args
          • Vl-fundecl-body-with-const-args
          • Vl-exprlist-args-to-4vec-consts
          • Sv::svex-constval
        • Addnames
        • Annotate
        • Clean-warnings
        • Eliminitial
        • Custom-transform-hooks
        • Problem-modules
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Elaborate

Vl-port-elaborate

Signature

(vl-port-elaborate x elabindex &key (reclimit 'reclimit) 
                   (config 'config)) 
 
  → 
(mv ok warnings new-x new-elabindex)

Arguments

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

reclimit — Guard (natp reclimit).

config — Guard (vl-simpconfig-p config).

Returns

warnings — Type (vl-warninglist-p warnings).

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

Definitions and Theorems

Function: vl-port-elaborate-fn

(defun vl-port-elaborate-fn (x elabindex reclimit config)
 (declare (xargs :stobjs (elabindex)))
 (declare (xargs :guard (and (vl-port-p x)
                             (natp reclimit)
                             (vl-simpconfig-p config))))
 (let ((__function__ 'vl-port-elaborate))
  (declare (ignorable __function__))
  (let ((x (vl-port-fix x)))
   (common-lisp::case (tag x)
     ((:vl-regularport)
      (b*
       (((mv ok warnings x.vl-regularport elabindex)
         (vl-regularport-elaborate-fn x elabindex reclimit config)))
       (mv ok
           warnings x.vl-regularport elabindex)))
     (otherwise (b* (((mv ok
                          warnings x.vl-interfaceport elabindex)
                      (vl-interfaceport-elaborate-fn
                           x elabindex reclimit config)))
                  (mv ok warnings
                      x.vl-interfaceport elabindex)))))))

Theorem: vl-warninglist-p-of-vl-port-elaborate.warnings

(defthm vl-warninglist-p-of-vl-port-elaborate.warnings
  (b* (((mv ?ok ?warnings ?new-x ?new-elabindex)
        (vl-port-elaborate-fn x elabindex reclimit config)))
    (vl-warninglist-p warnings))
  :rule-classes :rewrite)

Theorem: vl-port-p-of-vl-port-elaborate.new-x

(defthm vl-port-p-of-vl-port-elaborate.new-x
  (b* (((mv ?ok ?warnings ?new-x ?new-elabindex)
        (vl-port-elaborate-fn x elabindex reclimit config)))
    (vl-port-p new-x))
  :rule-classes :rewrite)

Theorem: vl-port-elaborate-fn-of-vl-port-fix-x

(defthm vl-port-elaborate-fn-of-vl-port-fix-x
  (equal (vl-port-elaborate-fn (vl-port-fix x)
                               elabindex reclimit config)
         (vl-port-elaborate-fn x elabindex reclimit config)))

Theorem: vl-port-elaborate-fn-vl-port-equiv-congruence-on-x

(defthm vl-port-elaborate-fn-vl-port-equiv-congruence-on-x
 (implies
   (vl-port-equiv x x-equiv)
   (equal (vl-port-elaborate-fn x elabindex reclimit config)
          (vl-port-elaborate-fn x-equiv elabindex reclimit config)))
 :rule-classes :congruence)

Theorem: vl-port-elaborate-fn-of-nfix-reclimit

(defthm vl-port-elaborate-fn-of-nfix-reclimit
  (equal (vl-port-elaborate-fn x elabindex (nfix reclimit)
                               config)
         (vl-port-elaborate-fn x elabindex reclimit config)))

Theorem: vl-port-elaborate-fn-nat-equiv-congruence-on-reclimit

(defthm vl-port-elaborate-fn-nat-equiv-congruence-on-reclimit
 (implies
   (acl2::nat-equiv reclimit reclimit-equiv)
   (equal (vl-port-elaborate-fn x elabindex reclimit config)
          (vl-port-elaborate-fn x elabindex reclimit-equiv config)))
 :rule-classes :congruence)

Theorem: vl-port-elaborate-fn-of-vl-simpconfig-fix-config

(defthm vl-port-elaborate-fn-of-vl-simpconfig-fix-config
  (equal (vl-port-elaborate-fn x elabindex
                               reclimit (vl-simpconfig-fix config))
         (vl-port-elaborate-fn x elabindex reclimit config)))

Theorem: vl-port-elaborate-fn-vl-simpconfig-equiv-congruence-on-config

(defthm
      vl-port-elaborate-fn-vl-simpconfig-equiv-congruence-on-config
 (implies
   (vl-simpconfig-equiv config config-equiv)
   (equal (vl-port-elaborate-fn x elabindex reclimit config)
          (vl-port-elaborate-fn x elabindex reclimit config-equiv)))
 :rule-classes :congruence)