add typed/racket/async-channel

Good catch, this should work. @stchang take a look at the `ChannelTop:` case in `type-contract.rkt` and also the `make-top-predicate.rkt` test in the integration tests.