gistfile1.txt

> (require data/red-black/ordered-set)
> (define s (new-ordered-set))
> (ordered-set-add! s "hi")
> (ordered-set-add! s "mye")
> (ordered-set-add! s "aloha") 
> (for ([x s]) (printf "this says: ~s" x))
this says: "aloha"this says: "hi"this says: "mye"
> (ordered-set-contains?)
ordered-set-contains?: undefined;
 cannot reference undefined identifier
  context...:
   /Applications/Racket v5.3.1/collects/racket/private/misc.rkt:87:7
> (ordered-set-member?)
ordered-set-member?: arity mismatch;
 the expected number of arguments does not match the given number
  expected: 2
  given: 0
  context...:
   /Applications/Racket v5.3.1/collects/racket/private/misc.rkt:87:7
> (ordered-set-member? s "hi")
#t
> (ordered-set-member? s "blah")