• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
  • Software-verification
    • Kestrel-books
      • Crypto-hdwallet
      • Apt
      • Error-checking
      • Abnf
        • Deftreeops
        • Defdefparse
        • Defgrammar
        • Abnf-tree-utilities
        • Notation
          • Syntax-abstraction
          • Semantics
            • Tree-terminatedp
            • Tree->string
            • String-has-finite-parse-trees-p
            • Parse-trees-of-string-p
            • Tree-match-element-p
            • Parse-treep
            • Symbol
            • Nat-match-insensitive-char-p
            • String-unambiguousp
            • Tree-match-num-val-p
            • Nats-match-insensitive-chars-p
            • Tree-option
            • String-parsablep
            • Lookup-rulename
            • Nats-match-sensitive-chars-p
            • Numrep-match-repeat-range-p
            • Tree-match-char-val-p
            • Tree-list-match-repetition-p
            • String-ambiguousp
            • Nat-match-sensitive-char-p
            • Parse
            • Tree-match-prose-val-p
            • Theorems-about-terminated-trees-matching-elements
            • Tree-option-result
            • Tree-list-result
            • Tree-list-list-result
            • Tree-result
            • Tree-list-list-match-concatenation-p
            • Languagep
            • Terminal-string-for-rules-p
            • Tree-list-list-match-alternation-p
            • Tree-list-match-element-p
            • Parse!
            • String
            • Tree-set
            • Trees
          • Abstract-syntax
          • Core-rules
          • Concrete-syntax
        • Grammar-parser
        • Meta-circular-validation
        • Parsing-primitives-defresult
        • Parsing-primitives-seq
        • Operations
        • Examples
        • Differences-with-paper
        • Grammar-printer
        • Parsing-tools
      • Fty-extensions
      • Isar
      • Kestrel-utilities
      • Soft
      • Bv
      • Imp-language
      • Event-macros
      • C
      • Java
      • Bitcoin
      • Ethereum
      • Yul
      • Zcash
      • ACL2-programming-language
      • Prime-fields
      • Json
      • Syntheto
      • File-io-light
      • Number-theory
      • Cryptography
      • Lists-light
      • Builtins
      • Axe
      • Solidity
      • Helpers
      • Std-extensions
      • Htclient
      • Typed-lists-light
      • Arithmetic-light
    • X86isa
    • Axe
    • Execloader
  • Math
  • Testing-utilities

• Semantics

Nat-match-sensitive-char-p

Semantics of characters in case-sensitive character value notations.

Signature

(nat-match-sensitive-char-p nat char) → yes/no

Arguments

nat — Guard (natp nat).

char — Guard (characterp char).

Returns

yes/no — Type (booleanp yes/no).

A natural number matches a character in a case-sensitive character value notation iff the natural number is the character's code.

Definitions and Theorems

Function: nat-match-sensitive-char-p

(defun nat-match-sensitive-char-p (nat char)
  (declare (xargs :guard (and (natp nat) (characterp char))))
  (b* ((nat (mbe :logic (nfix nat) :exec nat)))
    (equal nat (char-code char))))

Theorem: booleanp-of-nat-match-sensitive-char-p

(defthm booleanp-of-nat-match-sensitive-char-p
  (b* ((yes/no (nat-match-sensitive-char-p nat char)))
    (booleanp yes/no))
  :rule-classes :rewrite)

Theorem: nat-match-sensitive-char-p-of-char-fix

(defthm nat-match-sensitive-char-p-of-char-fix
  (equal (nat-match-sensitive-char-p nat (char-fix char))
         (nat-match-sensitive-char-p nat char)))

Theorem: nat-match-sensitive-char-p-of-nfix-nat

(defthm nat-match-sensitive-char-p-of-nfix-nat
  (equal (nat-match-sensitive-char-p (nfix nat)
                                     char)
         (nat-match-sensitive-char-p nat char)))

Theorem: nat-match-sensitive-char-p-nat-equiv-congruence-on-nat

(defthm nat-match-sensitive-char-p-nat-equiv-congruence-on-nat
  (implies (acl2::nat-equiv nat nat-equiv)
           (equal (nat-match-sensitive-char-p nat char)
                  (nat-match-sensitive-char-p nat-equiv char)))
  :rule-classes :congruence)

Theorem: nat-match-sensitive-char-p-of-char-fix-char

(defthm nat-match-sensitive-char-p-of-char-fix-char
  (equal (nat-match-sensitive-char-p nat (char-fix char))
         (nat-match-sensitive-char-p nat char)))

Theorem: nat-match-sensitive-char-p-chareqv-congruence-on-char

(defthm nat-match-sensitive-char-p-chareqv-congruence-on-char
  (implies (acl2::chareqv char char-equiv)
           (equal (nat-match-sensitive-char-p nat char)
                  (nat-match-sensitive-char-p nat char-equiv)))
  :rule-classes :congruence)