Sample code (2)

if (myid == 1) {

if (n==0) n=100;

else n=0;

}

len = sizeof(int);

res = Broadcast(1, 1, &n, &len);

if (n == 0) done = 1;

else {

h = 1.0 / (double) n; sum = 0.0;

for (i = myid; i <= n; i += numprocs) {

x = h * ((double)i - 0.5);

sum += f(x);

}

mypi = h * sum;

if (myid == 1) {

pi = mypi;

for(i=0; i<numprocs-1; i++) {

len = sizeof(double);

res = ReceiveAny(&from, &otherpi, &len);

pi += otherpi;

}

printf("pi is %.16f, Error %.16f\n", pi, fabs(pi - PI25DT));

} else {res = Send(1, &mypi, sizeof(double)); }

}

exit(0);

}