• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Community
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
    • Kestrel-books
      • Crypto-hdwallet
      • Apt
      • Error-checking
      • Fty-extensions
      • Isar
      • Kestrel-utilities
      • Set
      • C
        • Syntax-for-tools
          • Formalized-subset
          • Mapping-to-language-definition
          • Input-files
          • Compilation-database
          • Printer
          • Output-files
          • Abstract-syntax-operations
            • Expr-priority
            • Expr-priority-<=
            • Combine-dirabsdeclor-into-dirabsdeclor
            • Declor/dirdeclor-rename
            • Check-decl-spec-list-all-typespec/stoclass
            • Binop-expected-priorities
            • Expr->priority
            • Transunit-at-path
            • Declor/dirdeclor->ident
            • Declor/dirdeclor-has-params-p
            • Check-expr-binary
            • Apply-post-inc/dec-ops
            • Check-spec/qual-list-all-typespec
            • Apply-pre-inc/dec-ops
            • Check-decl-spec-list-all-typespec
            • Expr-to-asg-expr-list
            • Check-expr-mul
            • Expr-unary/postfix/primary-p
            • Transunit-ensemble-paths
            • Check-struni-spec-no-members
            • Expr-postfix/primary-p
            • Dirabsdeclor-declor?-nil-p
            • Check-enum-spec-no-list
            • Expr-zerop
            • Expr-priority->=
            • Decl-spec-list-to-stor-spec-list
            • Spec/qual-list-to-type-spec-list
            • Expr-priority->
            • Expr-priority-<
            • Declor-spec-list-filter-out-linkage-specs
            • Decl-spec-list-to-type-spec-list
            • Ident-list-map-expr-ident
            • Binop->priority
            • Stringlit-list->prefix?-list
            • Declor-spec-list-make-static
            • Binop-strictp
            • Check-expr-iconst
            • Init-declor->ident
            • Check-expr-ident
            • Dirabsdeclor-to-dirdeclor
            • Dirabsdeclor-option-to-dirdeclor
            • Dirdeclor-has-params-p
            • Absdeclor-to-declor
            • Dirdeclor-rename
            • Declor-rename
            • Declor-has-params-p
            • Dirdeclor->ident
            • Declor->ident
          • Implementation-environments
          • Abstract-syntax
          • Concrete-syntax
          • Disambiguation
          • Validation
          • Gcc-builtins
          • Preprocessing
          • Parsing
        • Atc
        • Transformation-tools
        • Language
        • Representation
        • Insertion-sort
        • Pack
      • Soft
      • Bv
      • Imp-language
      • Ethereum
      • Event-macros
      • Java
      • Riscv
      • Bitcoin
      • Zcash
      • Yul
      • ACL2-programming-language
      • Prime-fields
      • Json
      • Syntheto
      • File-io-light
      • Cryptography
      • Number-theory
      • Axe
      • Lists-light
      • Builtins
      • Solidity
      • Helpers
      • Htclient
      • Typed-lists-light
      • Arithmetic-light
    • X86isa
    • Axe
    • Execloader
  • Math
  • Testing-utilities

• Abstract-syntax-operations

Stringlit-list->prefix?-list

Lift stringlit->prefix? to lists.

Signature

(stringlit-list->prefix?-list strlits) → prefixes

Arguments

strlits — Guard (stringlit-listp strlits).

Returns

prefixes — Type (eprefix-option-listp prefixes).

Definitions and Theorems

Function: stringlit-list->prefix?-list

(defun stringlit-list->prefix?-list (strlits)
  (declare (xargs :guard (stringlit-listp strlits)))
  (cond ((endp strlits) nil)
        (t (cons (stringlit->prefix? (car strlits))
                 (stringlit-list->prefix?-list (cdr strlits))))))

Theorem: eprefix-option-listp-of-stringlit-list->prefix?-list

(defthm eprefix-option-listp-of-stringlit-list->prefix?-list
  (b* ((prefixes (stringlit-list->prefix?-list strlits)))
    (eprefix-option-listp prefixes))
  :rule-classes :rewrite)

Theorem: stringlit-list->prefix?-list-of-stringlit-list-fix-strlits

(defthm stringlit-list->prefix?-list-of-stringlit-list-fix-strlits
  (equal (stringlit-list->prefix?-list (stringlit-list-fix strlits))
         (stringlit-list->prefix?-list strlits)))

Theorem: stringlit-list->prefix?-list-stringlit-list-equiv-congruence-on-strlits

(defthm
 stringlit-list->prefix?-list-stringlit-list-equiv-congruence-on-strlits
 (implies (stringlit-list-equiv strlits strlits-equiv)
          (equal (stringlit-list->prefix?-list strlits)
                 (stringlit-list->prefix?-list strlits-equiv)))
 :rule-classes :congruence)