• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
      • Std/lists
      • Std/alists
      • Obags
      • Std/util
      • Std/strings
        • Pretty-printing
        • Printtree
        • Base64
        • Charset-p
        • Strtok!
        • Cases
        • Concatenation
        • Html-encoding
        • Character-kinds
          • Letter/digit/uscore/dollar-char-p
          • Letter/digit/uscore/dash-char-p
          • Letter/uscore/dollar-char-p
          • Letter/digit/uscore-char-p
          • Letter/digit/dash-char-p
          • Letter-char-p
          • Letter/digit-char-p
          • Lcletter/digit-char-p
          • Ucletter/digit-char-p
          • Printable-char-p
          • Nondigit-char-p
          • Ucletter-char-p
            • Ucletter-charlist-p
            • Ucletter-chars
          • Lcletter-char-p
        • Substrings
        • Strtok
        • Equivalences
        • Url-encoding
        • Lines
        • Explode-implode-equalities
        • Ordering
        • Numbers
        • Pad-trim
        • Coercion
        • Std/strings/digit-to-char
        • Substitution
        • Symbols
      • Std/osets
      • Std/io
      • Std/basic
      • Std/system
      • Std/typed-lists
      • Std/bitsets
      • Std/testing
      • Std/typed-alists
      • Std/stobjs
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
    • Software-verification
    • Math
    • Testing-utilities
  • Character-kinds

Ucletter-char-p

Recognize uppercase ASCII letters.

Definitions and Theorems

Function: ucletter-char-p

(defun ucletter-char-p (x)
  (declare (xargs :guard t))
  (and (characterp x)
       (b* ((code (char-code x)))
         (and (<= (char-code #\A) code)
              (<= code (char-code #\Z))))))

Theorem: booleanp-of-ucletter-char-p

(defthm booleanp-of-ucletter-char-p
  (booleanp (ucletter-char-p x))
  :rule-classes :type-prescription)

Theorem: characterp-when-ucletter-char-p

(defthm characterp-when-ucletter-char-p
  (implies (ucletter-char-p x)
           (characterp x))
  :rule-classes :compound-recognizer)

Subtopics

Ucletter-charlist-p
(ucletter-charlist-p x) recognizes lists where every element satisfies ucletter-char-p.
Ucletter-chars
A character set for ucletter-char-p.