On Fri, Jul 13, 2012 at 9:02 AM, Rouben Rostamian <rostam...@umbc.edu> wrote:
> The function `all-lower-case?' defined below takes a string and
> returns #f if the string has at least one uppercase alphabetic
> character, else returns #t.

Welcome to Racket v5.3.0.14.
-> (define (all-lower-case? s)
     (for/and ([c s] #:when (char-alphabetic? c))
        (not (char-upper-case? c))))
-> (all-lower-case? "asdf12#@")
#t
-> (all-lower-case? "asDf12#@")
#f


-- 
sam th
sa...@ccs.neu.edu
____________________
  Racket Users list:
  http://lists.racket-lang.org/users

Reply via email to