#lang planet dyoo/whalesong/base (char-upcase #\a) (char-upcase #\b) (char-upcase #\c) (char-upcase #\A) (char-upcase #\B) (char-upcase #\C) (char-downcase #\a) (char-downcase #\b) (char-downcase #\c) (char-downcase #\A) (char-downcase #\B) (char-downcase #\C)