/* nag_random_discrete_uniform(g05dyc) Example Program * * Copyright 1990 Numerical Algorithms Group. * * Mark 1, 1990. */ #include #include #include #include int main(void) { Integer seed = 0; Integer five = 5; Integer i, ix; Vprintf("g05dyc Example Program Results\n"); g05cbc(seed); for (i = 1; i <= 5; ++i) { ix = g05dyc(-five, five); Vprintf("%5ld\n",ix); } return EXIT_SUCCESS; }