On Wed, Dec 14, 2016 at 07:18:42AM +0000, dean wrote:
> : (setq LstA (chop 'dOg))
> -> ("d" "O" "g")
> : (pick '((Ch) (and (= Ch (uppc Ch)) Ch)) LstA)
> -> "O"
>
> but wonder if there's a slicker way?Yes: : (find upp? (chop "dOg")) -> "O" - Alex -- UNSUBSCRIBE: mailto:[email protected]?subject=Unsubscribe
