Maybe the issue is line 52 of math/private/distributions/utils (it seems
like a typo to me)

(define-type type-name (struct-name Real Flonum))


I think this means that the type Discrete-Uniform-Dist is really
(discrete-uniform-dist-struct Real Flonum).

Anyway, if I change the return typed of discrete-uniform to
(discrete-uniform-dist-struct Real Integer) then your code type-checks.

-- 
You received this message because you are subscribed to the Google Groups 
"Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to racket-users+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Reply via email to