Pangram checker: Difference between revisions
Content added Content deleted
(Undo revision 98625 by 76.204.16.57 (talk)) |
|||
Line 366: | Line 366: | ||
// Convert to lower case. |
// Convert to lower case. |
||
transform(s.begin(), s.end(), s.begin(), ::tolower); |
transform(s.begin(), s.end(), s.begin(), ::tolower); |
||
// Convert to a sorted sequence of unique characters. |
// Convert to a sorted sequence of (not necessarily unique) characters. |
||
sort(s.begin(), s.end()); |
sort(s.begin(), s.end()); |
||
// Is the second sequence a subset of the first sequence? |
// Is the second sequence a subset of the first sequence? |
||
// Repeated letters in "s" are okay, since it still "includes" the single letter |
|||
return includes(s.begin(), s.end(), alphabet.begin(), alphabet.end()); |
return includes(s.begin(), s.end(), alphabet.begin(), alphabet.end()); |
||
}</lang> |
}</lang> |
||
=={{header|Clojure}}== |
=={{header|Clojure}}== |
||
<lang lisp>(defn pangram? [s] |
<lang lisp>(defn pangram? [s] |