I would like to be able to compare two lists, strings, and in general sequences for their ordering: smaller than or greater than. I don't see a procedure for that in the current version.
Do you mean something like this:
#lang racket
(provide
(contract-out
[<-anything (-> sequence? sequence? (-> any/c any/c boolean?) boolean?)]))
(define (<-anything seq1 seq2 <)
(for/and ([s seq1] [t seq2]) (< s t)))
(module+ test
(require rackunit)
(require (submod ".."))
(<-anything 1 2 <) ;; these are strange sequences
(<-anything "1" "2" char<?)
(<-anything '[1] '[2] <))
Thanks. Meanwhile I have made my own specialized comparison procedure (predicate) which works fine with my data.