• 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
          • Preprocessor
          • Vl-loadconfig
          • Lexer
          • Vl-loadstate
          • Parser
            • Parse-expressions
              • Vl-parse-parameter-value-assignment-hack
              • Vl-erange-p
              • Vl-mixed-binop-list-p
              • Vl-parse-very-simple-type
              • Vl-mark-as-explicit-parens
              • Vl-parse-0+-scope-prefixes
              • Vl-parse-0+-attribute-instances
              • Vl-parse-op
              • Vl-parse-hierarchical-identifier
              • Vl-parse-pva-tail
              • Vl-parse-expression-top
              • Vl-parse-any-sort-of-concatenation
              • Vl-build-indexing-nest
              • Vl-erangetypelist-p
              • Vl-build-range-select-with
              • Vl-build-range-select
              • Vl-parse-simple-type
              • Vl-expr-has-any-atts-p
              • Vl-left-associate-mixed-binop-list
              • Vl-tack-scopes-onto-hid
              • Vl-parse-op-alist-p
                • Vl-make-guts-from-inttoken
                • Vl-parse-range-expression
                • Vl-parse-slice-size
                • Vl-parse-concatenation
                • Vl-parse-stream-expression
                • Vl-parse-1+-stream-expressions-separated-by-commas
                • Vl-parse-stream-concatenation
                • Vl-parse-primary
                • Vl-parse-0+-bracketed-expressions
                • Vl-parse-system-function-call
                • Vl-parse-shift-expression-aux
                • Vl-parse-power-expression-aux
                • Vl-parse-mult-expression-aux
                • Vl-parse-mintypmax-expression
                • Vl-parse-logor-expression-aux
                • Vl-parse-logand-expression-aux
                • Vl-parse-indexed-id-2012
                • Vl-parse-indexed-id-2005
                • Vl-parse-equality-expression-aux
                • Vl-parse-equality-expression
                • Vl-parse-compare-expression-aux
                • Vl-parse-bitxor-expression-aux
                • Vl-parse-bitor-expression-aux
                • Vl-parse-bitand-expression-aux
                • Vl-parse-1+-open-value-ranges
                • Vl-parse-1+-keyval-expression-pairs
                • Vl-parse-unary-expression
                • Vl-parse-shift-expression
                • Vl-parse-qmark-expression
                • Vl-parse-primary-main
                • Vl-parse-primary-cast
                • Vl-parse-power-expression
                • Vl-parse-open-value-range
                • Vl-parse-nonprimary-cast
                • Vl-parse-mult-expression
                • Vl-parse-logor-expression
                • Vl-parse-logand-expression
                • Vl-parse-indexed-id
                • Vl-parse-impl-expression
                • Vl-parse-function-call
                • Vl-parse-expression
                • Vl-parse-compare-expression
                • Vl-parse-bitxor-expression
                • Vl-parse-bitor-expression
                • Vl-parse-bitand-expression
                • Vl-parse-assignment-pattern
                • Vl-parse-add-expression-aux
                • Vl-parse-add-expression
                • Vl-parse-1+-expressions-separated-by-commas
              • Parse-udps
              • Vl-genelements
              • Parse-paramdecls
              • Parse-blockitems
              • Parse-utils
              • Parse-insts
              • Parse-datatype
              • Parse-functions
              • Parse-datatypes
              • Parse-strengths
              • Vl-parse-genvar-declaration
              • Vl-parse
              • Parse-ports
              • Seq
              • Parse-packages
            • Vl-load-merge-descriptions
            • Scope-of-defines
            • Vl-load-file
            • Vl-flush-out-descriptions
            • Vl-description
            • Vl-loadresult
            • Vl-read-file
            • Vl-find-basename/extension
            • Vl-find-file
            • Vl-read-files
            • Extended-characters
            • Vl-load
            • Vl-load-main
            • Vl-load-description
            • Vl-descriptions-left-to-load
            • Inject-warnings
            • Vl-load-descriptions
            • Vl-load-files
            • Vl-load-summary
            • Vl-collect-modules-from-descriptions
            • Vl-descriptionlist
          • Transforms
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Parse-expressions

    Vl-parse-op-alist-p

    Signature
    (vl-parse-op-alist-p arity x) → *
    Arguments
    arity — Guard (maybe-natp arity).

    Definitions and Theorems

    Function: vl-parse-op-alist-p

    (defun vl-parse-op-alist-p (arity x)
      (declare (xargs :guard (maybe-natp arity)))
      (let ((__function__ 'vl-parse-op-alist-p))
        (declare (ignorable __function__))
        (if (atom x)
            (not x)
          (and (consp (car x))
               (symbolp (caar x))
               (vl-op-p (cdar x))
               (eql arity (vl-op-arity (cdar x)))
               (vl-parse-op-alist-p arity (cdr x))))))

    Theorem: vl-parse-op-alist-p-when-atom

    (defthm vl-parse-op-alist-p-when-atom
      (implies (atom x)
               (equal (vl-parse-op-alist-p arity x)
                      (not x))))

    Theorem: vl-parse-op-alist-p-of-cons

    (defthm vl-parse-op-alist-p-of-cons
      (equal (vl-parse-op-alist-p arity (cons a x))
             (and (consp a)
                  (symbolp (car a))
                  (vl-op-p (cdr a))
                  (eql arity (vl-op-arity (cdr a)))
                  (vl-parse-op-alist-p arity x))))