• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
        • Syntax
        • Getting-started
        • Utilities
        • Loader
        • Transforms
        • Lint
        • Mlib
        • Server
        • Kit
        • Printer
          • Ps
          • Basic-printing
          • Verilog-printing
            • Vl-fmt
            • Vl-ppc-module
              • Vl-make-item-map-for-ppc-module
                • Vl-modinstlist-ppmap
                • Vl-vardecllist-ppmap
                • Vl-taskdecllist-ppmap
                • Vl-portdecllist-ppmap
                  • Vl-paramdecllist-ppmap
                  • Vl-modportlist-ppmap
                  • Vl-initiallist-ppmap
                  • Vl-gateinstlist-ppmap
                  • Vl-fundecllist-ppmap
                  • Vl-assignlist-ppmap
                  • Vl-alwayslist-ppmap
              • Vl-pp-expr
              • Vl-maybe-escape-identifier
              • Vl-print-ext-wirename
              • Vl-pp-module
              • Vl-print-wirename
              • Vl-print-loc
              • Vl-print-modname
              • Vl-pp-origexpr
              • Vl-pps-module
              • Vl-pps-expr
              • Vl-ppc-modulelist
              • Vl-ppcs-module
              • Vl-ps-update-show-atts
              • Vl-pps-origexpr
              • Vl-pps-modulelist
              • Vl-ppcs-modulelist
              • Vl-cw-obj
              • Vl-ps->show-atts-p
              • Vl-cw
            • Printing-locally
            • Formatted-printing
            • Accessing-printed-output
            • Vl-printedlist
            • Json-printing
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Vl-make-item-map-for-ppc-module

    Vl-portdecllist-ppmap

    Signature
    (vl-portdecllist-ppmap x item-map &key (ps 'ps)) 
      → 
    (mv item-map ps)
    Arguments
    x — Guard (vl-portdecllist-p x).
    item-map — Guard (vl-commentmap-p item-map).
    Returns
    item-map — Type (vl-commentmap-p item-map).

    Definitions and Theorems

    Function: vl-portdecllist-ppmap-fn

    (defun vl-portdecllist-ppmap-fn (x item-map ps)
      (declare (xargs :stobjs (ps)))
      (declare (xargs :guard (and (vl-portdecllist-p x)
                                  (vl-commentmap-p item-map))))
      (let ((__function__ 'vl-portdecllist-ppmap))
        (declare (ignorable __function__))
        (b* (((when (atom x))
              (mv (vl-commentmap-fix item-map) ps))
             ((mv str ps)
              (with-semilocal-ps (vl-pp-portdecl (car x))))
             (item-map (cons (cons (vl-portdecl->loc (car x)) str)
                             item-map)))
          (vl-portdecllist-ppmap (cdr x)
                                 item-map))))

    Theorem: vl-commentmap-p-of-vl-portdecllist-ppmap.item-map

    (defthm vl-commentmap-p-of-vl-portdecllist-ppmap.item-map
      (b* (((mv ?item-map ?ps)
            (vl-portdecllist-ppmap-fn x item-map ps)))
        (vl-commentmap-p item-map))
      :rule-classes :rewrite)

    Theorem: vl-portdecllist-ppmap-fn-of-vl-portdecllist-fix-x

    (defthm vl-portdecllist-ppmap-fn-of-vl-portdecllist-fix-x
      (equal (vl-portdecllist-ppmap-fn (vl-portdecllist-fix x)
                                       item-map ps)
             (vl-portdecllist-ppmap-fn x item-map ps)))

    Theorem: vl-portdecllist-ppmap-fn-vl-portdecllist-equiv-congruence-on-x

    (defthm
         vl-portdecllist-ppmap-fn-vl-portdecllist-equiv-congruence-on-x
      (implies (vl-portdecllist-equiv x x-equiv)
               (equal (vl-portdecllist-ppmap-fn x item-map ps)
                      (vl-portdecllist-ppmap-fn x-equiv item-map ps)))
      :rule-classes :congruence)

    Theorem: vl-portdecllist-ppmap-fn-of-vl-commentmap-fix-item-map

    (defthm vl-portdecllist-ppmap-fn-of-vl-commentmap-fix-item-map
      (equal (vl-portdecllist-ppmap-fn x (vl-commentmap-fix item-map)
                                       ps)
             (vl-portdecllist-ppmap-fn x item-map ps)))

    Theorem: vl-portdecllist-ppmap-fn-vl-commentmap-equiv-congruence-on-item-map

    (defthm
     vl-portdecllist-ppmap-fn-vl-commentmap-equiv-congruence-on-item-map
     (implies (vl-commentmap-equiv item-map item-map-equiv)
              (equal (vl-portdecllist-ppmap-fn x item-map ps)
                     (vl-portdecllist-ppmap-fn x item-map-equiv ps)))
     :rule-classes :congruence)