• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Debugging
    • Projects
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
          • Typo-detection
            • Typo-read-lowercase-part
            • Typo-read-part
            • Typo-read-uppercase-part
            • Typo-read-special
            • Typo-detect-aux
            • Typo-detect
            • Typo-find-plausible-typos1
              • Typo-mismatch-plausibly-typo-p
              • Typo-partitioning-alist
              • Typo-partition
              • Vl-typo-first-mismatch
              • Typo-partitions-plausibly-typo-p
              • Vl-typo-count-mismatches
              • Typo-numbers
              • *typo-special-substrings-chars*
              • *typo-numbers*
            • Vl-wireinfo-alistp
            • Vl-annotate-vardecllist-with-wireinfo
            • Vl-useset-report-entry-p
            • Vl-print-useset-report-entry
            • Vl-mark-wires-for-module
            • Vl-split-useset-report
            • Vl-annotate-vardecl-with-wireinfo
            • Vl-mark-wires-for-modinstlist
            • Vl-mark-wires-for-modinst
            • Vl-mark-wires-for-gateinstlist
            • Vl-mark-wires-for-gateinst
            • Vl-mark-wires-for-plainarg
            • Vl-wireinfo-p
            • Vl-mark-wires-for-modulelist
            • Vl-vardecllist-impexp-names
            • Vl-report-totals
            • Vl-mark-wires-for-plainarglist
            • Vl-collect-unused-or-unset-wires
            • Vl-clean-up-warning-wires
            • Vl-print-useset-report-top
            • Vl-mark-wires-for-arguments
            • Vl-useset-report-p
            • Vl-star-names-of-warning-wires
            • Vl-design-use-set-report
            • Vl-module-impexp-names
            • Vl-make-initial-wireinfo-alist
            • Vl-mark-wire-used
            • Vl-mark-wire-set
            • Vl-mark-wires-used
            • Vl-mark-wires-for-assignment
            • Vl-mark-wires-for-assignlist
            • Vl-mark-wires-set
            • Vl-print-useset-report-full-aux
            • Vl-print-typo-alist
            • Vl-print-typo-possibilities
          • Syntax
          • Getting-started
          • Utilities
          • Loader
          • Transforms
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Vwsim
        • Fgl
        • Vl
        • Svl
        • X86isa
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Typo-detection

    Typo-find-plausible-typos1

    Walk down the partitioning alist and gather the names of all signals that Part might be a typo for.

    Signature
    (typo-find-plausible-typos1 part alist) → plausible-typos
    Arguments
    part — Partitioning of a single wire.
        Guard (character-list-listp part).
    alist — Partitioning alist for a list of wires.
        Guard (alistp alist).
    Returns
    plausible-typos — Type (string-listp plausible-typos), given (force (vl-string-keys-p alist)).

    Definitions and Theorems

    Function: typo-find-plausible-typos1

    (defun typo-find-plausible-typos1 (part alist)
      (declare (xargs :guard (and (character-list-listp part)
                                  (alistp alist))))
      (declare
           (xargs :guard (and (vl-string-keys-p alist)
                              (vl-character-list-list-values-p alist))))
      (let ((__function__ 'typo-find-plausible-typos1))
        (declare (ignorable __function__))
        (cond ((atom alist) nil)
              ((typo-partitions-plausibly-typo-p part (cdar alist))
               (cons (caar alist)
                     (typo-find-plausible-typos1 part (cdr alist))))
              (t (typo-find-plausible-typos1 part (cdr alist))))))

    Theorem: string-listp-of-typo-find-plausible-typos1

    (defthm string-listp-of-typo-find-plausible-typos1
     (implies
         (force (vl-string-keys-p alist))
         (b* ((plausible-typos (typo-find-plausible-typos1 part alist)))
           (string-listp plausible-typos)))
     :rule-classes :rewrite)