• 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
        • Substrings
        • Strtok
        • Equivalences
        • Url-encoding
          • *url-encode-array*
          • Url-encode-chars-aux
          • Url-encode-char
          • Url-encode-chars
            • Url-encode-string
            • Url-encode-string-aux
            • Fast-url-encode-char
          • 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
    • Url-encoding

    Url-encode-chars

    Simple way to URL encode a list of characters.

    Signature
    (url-encode-chars x) → encoded
    Arguments
    x — Guard (character-listp x).
    Returns
    encoded — Type (character-listp encoded).

    Definitions and Theorems

    Function: url-encode-chars$inline

    (defun url-encode-chars$inline (x)
      (declare (xargs :guard (character-listp x)))
      (let ((acl2::__function__ 'url-encode-chars))
        (declare (ignorable acl2::__function__))
        (reverse (url-encode-chars-aux x nil))))

    Theorem: character-listp-of-url-encode-chars

    (defthm character-listp-of-url-encode-chars
      (b* ((encoded (url-encode-chars$inline x)))
        (character-listp encoded))
      :rule-classes :rewrite)

    Theorem: true-listp-of-url-encode-chars

    (defthm true-listp-of-url-encode-chars
      (true-listp (url-encode-chars x))
      :rule-classes :type-prescription)

    Theorem: url-encode-chars$inline-of-make-character-list-x

    (defthm url-encode-chars$inline-of-make-character-list-x
      (equal (url-encode-chars$inline (make-character-list x))
             (url-encode-chars$inline x)))

    Theorem: url-encode-chars$inline-charlisteqv-congruence-on-x

    (defthm url-encode-chars$inline-charlisteqv-congruence-on-x
      (implies (charlisteqv x x-equiv)
               (equal (url-encode-chars$inline x)
                      (url-encode-chars$inline x-equiv)))
      :rule-classes :congruence)