Downcase any string (even ones with non-standard characters).
;; Convert the characters in STR from upper to lower case, leaving ;; non-upper-case-letters unchanged. (defund string-downcase-gen (str) (declare (xargs :guard (stringp str))) (coerce (chars-downcase-gen (coerce str 'list) nil) 'string))