#lang typed/racket/base
(require typed/rackunit)(check-true (string<? "aaaa" "bbbb"))(check-true (string<? "aaaa" "aabb"))(check-true (string<? "aaaa" "aa"))--------------------string<?FAILUREname: check-truelocation: /Applications/Racket v7.6/share/pkgs/rackunit-typed/rackunit/main.rkt:33:2params: '(#f)--------------------