#include #include double gasdev(long *idum); double ran1(long *idum); int main() { int i; long idum=-10; for (i=0;i<1000;i++){ printf("%d %lf\n",i,gasdev(&idum)); // yout.dat } return 0; }