• 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
        • Scopestack
        • Hid-tools
        • Filtering-by-name
        • Vl-interface-mocktype
        • Stripping-functions
        • Genblob
        • Expr-tools
          • Vl-expr-typedecide
            • Vl-arithclass-p
              • Vl-arithclass-max
              • Vl-datatype-arithclass
              • Vl-integer-arithclass-p
              • Vl-integer-arithclass->exprsign
              • Vl-exprsign->arithclass
            • Vl-binaryop-typedecide
            • Vl-funcall-typedecide
            • Vl-index-typedecide
            • Vl-unaryop-typedecide
            • Vl-signedness-ambiguity-warning
            • Vl-syscall-typedecide
            • Vl-value-typedecide
            • Vl-operandinfo-signedness-caveat
          • Vl-exprlist-resolved->vals
          • Vl-make-idexpr-list
          • Vl-idexprlist->names
          • Vl-expr-selfsize
          • Vl-expr-update-subexprs
          • Vl-exprlist-to-plainarglist
          • Vl-call-namedargs-update-subexprs
          • Vl-valuerangelist-update-subexprs
          • Vl-streamexprlist-update-subexprs
          • Vl-op-p
          • Vl-maybe-exprlist-update-subexprs
          • Vl-evatomlist-update-subexprs
          • Vl-expr-values
          • Vl-keyvallist-update-subexprs
          • Vl-assignpat-update-subexprs
          • Vl-valuerange-update-subexprs
          • Vl-scopeexpr-update-subexprs
          • Vl-partselect-update-subexprs
          • Vl-hidexpr-update-subexprs
          • Vl-expr-add-atts
          • Vl-arrayrange-update-subexprs
          • Vl-streamexpr-update-subexprs
          • Vl-slicesize-update-subexprs
          • Vl-plusminus-update-subexprs
          • Vl-patternkey-update-subexprs
          • Vl-expr-ops
          • Vl-make-integer
          • Vl-range-update-subexprs
          • Vl-idexpr
          • Vl-make-index
          • Vl-expr->subexprs
          • Vl-bitlist-from-nat
          • Vl-pps-expr
          • Vl-maybe-exprlist->subexprs
          • Vl-hidexpr->subexprs
          • Vl-evatomlist->subexprs
          • Vl-call-namedargs->subexprs
          • Vl-valuerangelist->subexprs
          • Vl-streamexprlist->subexprs
          • Vl-keyvallist->subexprs
          • Vl-exprlist-has-ops
          • Vl-expr-resolved-p
          • Vl-valuerange->subexprs
          • Vl-streamexpr->subexprs
          • Vl-slicesize->subexprs
          • Vl-scopeexpr->subexprs
          • Vl-patternkey->subexprs
          • Vl-partselect->subexprs
          • Vl-assignpat->subexprs
          • Vl-arrayrange->subexprs
          • Vl-pps-origexpr
          • Vl-plusminus->subexprs
          • Vl-idscope
          • Vl-idexpr->name
          • Vl-expr-has-ops
          • Vl-resolved->val
          • Vl-range->subexprs
          • Vl-idexpr-p
          • Vl-idexprlist-p
          • Vl-exprlist-resolved-p
          • Vl-idscope->name
          • Vl-idscope-p
          • Vl-zbitlist-p
          • Vl-zatom-p
          • Vl-op-fix
          • Vl-oplist
          • Vl-expr-varnames
          • Vl-one-bit-constants
        • Extract-vl-types
        • Hierarchy
        • Range-tools
        • Finding-by-name
        • Stmt-tools
        • Modnamespace
        • Flat-warnings
        • Reordering-by-name
        • Datatype-tools
        • Syscalls
        • Allexprs
        • Lvalues
        • Port-tools
      • Transforms
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Vl-arithclass-p

Vl-integer-arithclass-p

Signature

(vl-integer-arithclass-p x) → *

Arguments

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

Definitions and Theorems

Function: vl-integer-arithclass-p$inline

(defun vl-integer-arithclass-p$inline (x)
  (declare (xargs :guard (vl-arithclass-p x)))
  (let ((__function__ 'vl-integer-arithclass-p))
    (declare (ignorable __function__))
    (or (vl-arithclass-equiv x :vl-signed-int-class)
        (vl-arithclass-equiv x :vl-unsigned-int-class))))

Theorem: vl-integer-arithclass-p-of-vl-exprsign->arithclass

(defthm vl-integer-arithclass-p-of-vl-exprsign->arithclass
  (vl-integer-arithclass-p (vl-exprsign->arithclass x)))

Function: vl-integer-arithclass->exprsign$inline

(defun vl-integer-arithclass->exprsign$inline (x)
  (declare (xargs :guard (vl-arithclass-p x)))
  (declare (xargs :guard (vl-integer-arithclass-p x)))
  (let ((__function__ 'vl-integer-arithclass->exprsign))
    (declare (ignorable __function__))
    (if (vl-arithclass-equiv x :vl-signed-int-class)
        :vl-signed
      :vl-unsigned)))

Theorem: vl-exprsign-p-of-vl-integer-arithclass->exprsign

(defthm vl-exprsign-p-of-vl-integer-arithclass->exprsign
  (b* ((sign (vl-integer-arithclass->exprsign$inline x)))
    (vl-exprsign-p sign))
  :rule-classes :rewrite)

Theorem: vl-integer-arithclass->exprsign$inline-of-vl-arithclass-fix-x

(defthm
      vl-integer-arithclass->exprsign$inline-of-vl-arithclass-fix-x
 (equal
      (vl-integer-arithclass->exprsign$inline (vl-arithclass-fix x))
      (vl-integer-arithclass->exprsign$inline x)))

Theorem: vl-integer-arithclass->exprsign$inline-vl-arithclass-equiv-congruence-on-x

(defthm
 vl-integer-arithclass->exprsign$inline-vl-arithclass-equiv-congruence-on-x
 (implies (vl-arithclass-equiv x x-equiv)
          (equal (vl-integer-arithclass->exprsign$inline x)
                 (vl-integer-arithclass->exprsign$inline x-equiv)))
 :rule-classes :congruence)

Theorem: symbolp-of-vl-datatype-arithclass

(defthm symbolp-of-vl-datatype-arithclass
  (let ((ret (mv-nth 1 (vl-datatype-arithclass x))))
    (and (symbolp ret)
         (not (equal ret t))
         (not (equal ret nil))))
  :rule-classes :type-prescription)

Theorem: vl-integer-arithclass-p-of-vl-arithclass-max

(defthm vl-integer-arithclass-p-of-vl-arithclass-max
  (implies (and (vl-integer-arithclass-p x)
                (vl-integer-arithclass-p y))
           (vl-integer-arithclass-p (vl-arithclass-max x y))))

Theorem: vl-integer-arithclass-p$inline-of-vl-arithclass-fix-x

(defthm vl-integer-arithclass-p$inline-of-vl-arithclass-fix-x
  (equal (vl-integer-arithclass-p$inline (vl-arithclass-fix x))
         (vl-integer-arithclass-p$inline x)))

Theorem: vl-integer-arithclass-p$inline-vl-arithclass-equiv-congruence-on-x

(defthm
 vl-integer-arithclass-p$inline-vl-arithclass-equiv-congruence-on-x
 (implies (vl-arithclass-equiv x x-equiv)
          (equal (vl-integer-arithclass-p$inline x)
                 (vl-integer-arithclass-p$inline x-equiv)))
 :rule-classes :congruence)