• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • Proof-automation
    • ACL2
    • Macro-libraries
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • Vl
        • Syntax
        • Loader
          • Preprocessor
          • Vl-loadconfig
          • Vl-loadstate
          • Lexer
          • Parser
            • Parse-expressions
            • Parse-udps
              • Vl-idtokenlist->names
              • Vl-make-traditional-udp-head
              • Vl-udp-head-p
              • Vl-parse-traditional-udp-head
              • Vl-parse-1+-udp-input-declarations-separated-by-commas
              • Vl-parse-udp-output-declaration
              • Vl-parse-integrated-udp-head
              • Vl-parse-udp-declaration
              • Vl-udp-body-p
              • Vl-parse-udp-initial-statement
              • Vl-parse-two-level-symbols
              • Vl-parse-udp-input-declaration
              • Vl-parse-combinational-entries-until-endtable
              • Vl-parse-udp-port-declaration
              • Vl-parse-sequential-entries-until-endtable
              • Vl-parse-level-symbol
              • Vl-parse-edge-symbol
              • Vl-parse-1+-udp-port-declarations
              • Vl-parse-0+-udp-port-declarations
              • Vl-skip-through-endprimitive
              • Vl-parse-udp-reg-declaration
              • Vl-parse-udp-init-val
              • Vl-parse-sequential-entry
              • Vl-parse-level-input-list
              • Vl-parse-edge-input-list
              • Vl-parse-udp-body
              • Vl-parse-seq-input-list
              • Vl-parse-combinational-entry
              • Vl-parse-combinational-body
              • Vl-port/vardecllist-p
              • Vl-parse-sequential-table
              • Vl-parse-edge-indicator
              • Vl-parse-output-symbol
              • Vl-parse-0+-level-symbols
              • Vl-parse-next-state
              • Vl-parse-current-state
              • Vl-make-udp-with-parse-error
              • Vl-make-udp-portdecls
              • Vl-port/vardecllist->vardecls
              • Vl-port/vardecllist->portdecls
              • Vl-port/vardecl
                • Vl-port/vardecl-fix
                • Vl-port/vardecl-equiv
                • Vl-port/vardecl-p
                • Vl-10-integer-token-p
                • Vl-01-integer-token-p
              • Parse-statements
              • Parse-property
              • Vl-genelements
              • Parse-paramdecls
              • Parse-blockitems
              • Parse-utils
              • Parse-insts
              • Parse-functions
              • Parse-assignments
              • Parse-clocking
              • Parse-strengths
              • Vl-parse-genvar-declaration
              • Vl-parse
              • Parse-netdecls
              • Parse-asserts
              • Vl-maybe-parse-lifetime
              • Parse-dpi-import-export
              • Parse-ports
              • Parse-timeunits
              • Seq
              • Parse-packages
              • Parse-eventctrl
            • Vl-load-merge-descriptions
            • Vl-find-basename/extension
            • Vl-load-file
            • Vl-loadresult
            • Scope-of-defines
            • Vl-find-file
            • Vl-flush-out-descriptions
            • Vl-description
            • Vl-read-file
            • Vl-includeskips-report-gather
            • Vl-load-main
            • Extended-characters
            • Vl-load
            • Vl-load-description
            • Vl-descriptions-left-to-load
            • Inject-warnings
            • Vl-preprocess-debug
            • Vl-write-preprocessor-debug-file
            • Vl-read-file-report-gather
            • Vl-load-descriptions
            • Vl-load-files
            • Translate-off
            • Vl-load-read-file-hook
            • Vl-read-file-report
            • Vl-loadstate-pad
            • Vl-load-summary
            • Vl-collect-modules-from-descriptions
            • Vl-loadstate->warnings
            • Vl-iskips-report
            • Vl-descriptionlist
          • Warnings
          • Getting-started
          • Utilities
          • Printer
          • Kit
          • Mlib
          • Transforms
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Vl-port/vardecl

    Vl-port/vardecl-p

    Recognizer for vl-port/vardecl.

    Signature
    (vl-port/vardecl-p x) → *

    Definitions and Theorems

    Function: vl-port/vardecl-p

    (defun vl-port/vardecl-p (x)
      (declare (xargs :guard t))
      (let ((__function__ 'vl-port/vardecl-p))
        (declare (ignorable __function__))
        (common-lisp::case (tag x)
          ((:vl-portdecl) (vl-portdecl-p x))
          (otherwise (vl-vardecl-p x)))))

    Theorem: consp-when-vl-port/vardecl-p

    (defthm consp-when-vl-port/vardecl-p
      (implies (vl-port/vardecl-p x)
               (consp x))
      :rule-classes :compound-recognizer)

    Theorem: vl-port/vardecl-p-when-vl-portdecl-p

    (defthm vl-port/vardecl-p-when-vl-portdecl-p
      (implies (vl-portdecl-p x)
               (vl-port/vardecl-p x))
      :rule-classes ((:rewrite :backchain-limit-lst 1)))

    Theorem: vl-port/vardecl-p-when-vl-vardecl-p

    (defthm vl-port/vardecl-p-when-vl-vardecl-p
      (implies (vl-vardecl-p x)
               (vl-port/vardecl-p x))
      :rule-classes ((:rewrite :backchain-limit-lst 1)))

    Theorem: vl-portdecl-p-by-tag-when-vl-port/vardecl-p

    (defthm vl-portdecl-p-by-tag-when-vl-port/vardecl-p
      (implies (and (or (equal (tag x) :vl-portdecl))
                    (vl-port/vardecl-p x))
               (vl-portdecl-p x))
      :rule-classes ((:rewrite :backchain-limit-lst 1)))

    Theorem: vl-vardecl-p-by-tag-when-vl-port/vardecl-p

    (defthm vl-vardecl-p-by-tag-when-vl-port/vardecl-p
      (implies (and (or (equal (tag x) :vl-vardecl))
                    (vl-port/vardecl-p x))
               (vl-vardecl-p x))
      :rule-classes ((:rewrite :backchain-limit-lst 1)))

    Theorem: vl-port/vardecl-p-when-invalid-tag

    (defthm vl-port/vardecl-p-when-invalid-tag
      (implies (and (not (equal (tag x) :vl-portdecl))
                    (not (equal (tag x) :vl-vardecl)))
               (not (vl-port/vardecl-p x)))
      :rule-classes ((:rewrite :backchain-limit-lst 0)))

    Theorem: tag-when-vl-port/vardecl-p-forward

    (defthm tag-when-vl-port/vardecl-p-forward
      (implies (vl-port/vardecl-p x)
               (or (equal (tag x) :vl-portdecl)
                   (equal (tag x) :vl-vardecl)))
      :rule-classes ((:forward-chaining)))