• 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
          • Expression-sizing
            • Expression-sizing-minutia
            • Expression-sizing-intro
            • Vl-keyvalue-pattern-collect-array-replacements
            • Vl-assignpattern-positional-replacement
            • Vl-plainarg-exprsize
            • Vl-assignpattern-keyvalue-replacement
            • Vl-keyvalue-pattern-collect-struct-replacements
            • Vl-modulelist-exprsize
            • Vl-expr-assignpattern-extend/truncate
            • Vl-structmemberlist->types
            • Vl-expr-size
            • Vl-expr-selfdetermine-type
            • Vl-assignpattern-multi-replacement
            • Vl-parse-keyval-pattern-struct
            • Vl-plainarglist-exprsize
            • Vl-parse-keyval-pattern-array
            • Vl-warn-about-implicit-extension
            • Vl-assigncontext-size
            • Vl-arguments-exprsize
            • Vl-assignpattern-replacement
            • Vl-packeddimensionlist-exprsize
            • Vl-namedparamvaluelist-exprsize
            • Vl-maybe-delayoreventcontrol-exprsize
            • Vl-repeateventcontrol-exprsize
            • Vl-paramvaluelist-exprsize
            • Vl-maybe-packeddimension-exprsize
            • Vl-delayoreventcontrol-exprsize
            • Vl-namedparamvalue-exprsize
            • Vl-namedarglist-exprsize
            • Vl-enumitemlist-exprsize
            • Vl-packeddimension-exprsize
            • Vl-maybe-paramvalue-exprsize
            • Vl-evatomlist-exprsize
            • Vl-atom-selfdetermine-type
            • Vl-rangelist-exprsize
            • Vl-maybe-gatedelay-exprsize
            • Vl-maybe-datatype-exprsize
            • Vl-gatedelay-exprsize
            • Vl-paramargs-exprsize
            • Vl-namedarg-exprsize
            • Vl-eventcontrol-exprsize
            • Vl-enumbasetype-exprsize
            • Vl-delaycontrol-exprsize
            • Vl-paramvalue-exprsize
            • Vl-maybe-range-exprsize
              • Vl-enumitem-exprsize
              • Vl-range-exprsize
              • Vl-paramdecl-exprsize
              • Vl-paramdecllist-exprsize
              • Vl-maybe-expr-size
              • Vl-evatom-exprsize
              • Vl-vardecllist-exprsize
              • Vl-portdecllist-exprsize
              • Vl-modinstlist-exprsize
              • Vl-initiallist-exprsize
              • Vl-gateinstlist-exprsize
              • Vl-fundecllist-exprsize
              • Vl-assign-exprsize
              • Vl-interfaceport-exprsize
              • Vl-assignlist-exprsize
              • Vl-alwayslist-exprsize
              • Vl-portlist-exprsize
              • Vl-modinst-exprsize
              • Vl-gateinst-exprsize
              • Vl-fundecl-exprsize
              • Vl-vardecl-exprsize
              • Vl-regularport-exprsize
              • Vl-portdecl-exprsize
              • Vl-initial-exprsize
              • Vl-always-exprsize
              • Vl-port-exprsize
              • Vl-lvalue-type
              • Vl-classify-extension-warning-hook
              • Welltyped
              • Vl-castexpr->datatype
              • Vl-expr-size-assigncontext
              • Vl-type-expr-pairs-sum-datatype-sizes
              • Vl-basictype->datatype
              • Vl-expr-replace-assignpatterns
              • Vl-design-exprsize
              • Vl-op-simple-vector-p
              • Vl-expr-val-alist-max-count
              • Vl-expr-has-patterns
              • Vl-exprlist-max-count
              • Vl-unsigned-when-size-zero-lst
              • Vl-type-expr-pairs
              • Append-n
              • Vl-expr-val-alist
              • Vl-datatypelist
            • Occform
            • Oprewrite
            • Expand-functions
            • Delayredux
            • Unparameterization
            • Caseelim
            • Split
            • Selresolve
            • Weirdint-elim
            • Vl-delta
            • Replicate-insts
            • Rangeresolve
            • Propagate
            • Clean-selects
            • Clean-params
            • Blankargs
            • Inline-mods
            • Expr-simp
            • Trunc
            • Always-top
            • Gatesplit
            • Gate-elim
            • Expression-optimization
            • Elim-supplies
            • Wildelim
            • Drop-blankports
            • Clean-warnings
            • Addinstnames
            • Custom-transform-hooks
            • Annotate
            • Latchcode
            • Elim-unused-vars
            • Problem-modules
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Expression-sizing

    Vl-maybe-range-exprsize

    Compute sizes and types of expressions throughout a vl-maybe-range-p

    Signature
    (vl-maybe-range-exprsize x ss ctx warnings) 
      → 
    (mv successp warnings new-x)
    Arguments
    x — Guard (vl-maybe-range-p x).
    ss — Guard (vl-scopestack-p ss).
    ctx — Guard (vl-context-p ctx).
    warnings — Guard (vl-warninglist-p warnings).
    Returns
    successp — Type (booleanp successp).
    warnings — Type (vl-warninglist-p warnings).
    new-x — Type (vl-maybe-range-p new-x).

    Definitions and Theorems

    Function: vl-maybe-range-exprsize

    (defun vl-maybe-range-exprsize (x ss ctx warnings)
      (declare (xargs :guard (and (vl-maybe-range-p x)
                                  (vl-scopestack-p ss)
                                  (vl-context-p ctx)
                                  (vl-warninglist-p warnings))))
      (let ((__function__ 'vl-maybe-range-exprsize))
        (declare (ignorable __function__))
        (b* ((x (vl-maybe-range-fix x))
             (warnings (vl-warninglist-fix warnings)))
          (if x (vl-range-exprsize x ss ctx warnings)
            (mv t warnings x)))))

    Theorem: booleanp-of-vl-maybe-range-exprsize.successp

    (defthm booleanp-of-vl-maybe-range-exprsize.successp
      (b* (((mv ?successp ?warnings ?new-x)
            (vl-maybe-range-exprsize x ss ctx warnings)))
        (booleanp successp))
      :rule-classes :type-prescription)

    Theorem: vl-warninglist-p-of-vl-maybe-range-exprsize.warnings

    (defthm vl-warninglist-p-of-vl-maybe-range-exprsize.warnings
      (b* (((mv ?successp ?warnings ?new-x)
            (vl-maybe-range-exprsize x ss ctx warnings)))
        (vl-warninglist-p warnings))
      :rule-classes :rewrite)

    Theorem: vl-maybe-range-p-of-vl-maybe-range-exprsize.new-x

    (defthm vl-maybe-range-p-of-vl-maybe-range-exprsize.new-x
      (b* (((mv ?successp ?warnings ?new-x)
            (vl-maybe-range-exprsize x ss ctx warnings)))
        (vl-maybe-range-p new-x))
      :rule-classes :rewrite)

    Theorem: vl-maybe-range-exprsize-of-vl-maybe-range-fix-x

    (defthm vl-maybe-range-exprsize-of-vl-maybe-range-fix-x
      (equal (vl-maybe-range-exprsize (vl-maybe-range-fix x)
                                      ss ctx warnings)
             (vl-maybe-range-exprsize x ss ctx warnings)))

    Theorem: vl-maybe-range-exprsize-vl-maybe-range-equiv-congruence-on-x

    (defthm vl-maybe-range-exprsize-vl-maybe-range-equiv-congruence-on-x
     (implies (vl-maybe-range-equiv x x-equiv)
              (equal (vl-maybe-range-exprsize x ss ctx warnings)
                     (vl-maybe-range-exprsize x-equiv ss ctx warnings)))
     :rule-classes :congruence)

    Theorem: vl-maybe-range-exprsize-of-vl-scopestack-fix-ss

    (defthm vl-maybe-range-exprsize-of-vl-scopestack-fix-ss
      (equal (vl-maybe-range-exprsize x (vl-scopestack-fix ss)
                                      ctx warnings)
             (vl-maybe-range-exprsize x ss ctx warnings)))

    Theorem: vl-maybe-range-exprsize-vl-scopestack-equiv-congruence-on-ss

    (defthm vl-maybe-range-exprsize-vl-scopestack-equiv-congruence-on-ss
     (implies (vl-scopestack-equiv ss ss-equiv)
              (equal (vl-maybe-range-exprsize x ss ctx warnings)
                     (vl-maybe-range-exprsize x ss-equiv ctx warnings)))
     :rule-classes :congruence)

    Theorem: vl-maybe-range-exprsize-of-vl-context-fix-ctx

    (defthm vl-maybe-range-exprsize-of-vl-context-fix-ctx
      (equal (vl-maybe-range-exprsize x ss (vl-context-fix ctx)
                                      warnings)
             (vl-maybe-range-exprsize x ss ctx warnings)))

    Theorem: vl-maybe-range-exprsize-vl-context-equiv-congruence-on-ctx

    (defthm vl-maybe-range-exprsize-vl-context-equiv-congruence-on-ctx
     (implies (vl-context-equiv ctx ctx-equiv)
              (equal (vl-maybe-range-exprsize x ss ctx warnings)
                     (vl-maybe-range-exprsize x ss ctx-equiv warnings)))
     :rule-classes :congruence)

    Theorem: vl-maybe-range-exprsize-of-vl-warninglist-fix-warnings

    (defthm vl-maybe-range-exprsize-of-vl-warninglist-fix-warnings
     (equal
        (vl-maybe-range-exprsize x ss ctx (vl-warninglist-fix warnings))
        (vl-maybe-range-exprsize x ss ctx warnings)))

    Theorem: vl-maybe-range-exprsize-vl-warninglist-equiv-congruence-on-warnings

    (defthm
     vl-maybe-range-exprsize-vl-warninglist-equiv-congruence-on-warnings
     (implies (vl-warninglist-equiv warnings warnings-equiv)
              (equal (vl-maybe-range-exprsize x ss ctx warnings)
                     (vl-maybe-range-exprsize x ss ctx warnings-equiv)))
     :rule-classes :congruence)