00335 {
00336
00337
00338
00339
00340 MPI_Datatype elem;
00341 MPI_Type_contiguous(sizeof(ArithT), MPI_BYTE, &elem);
00342 MPI_Type_commit(&elem);
00343 MPI_Bcast(&val, 1, elem, root, MPI_COMM_WORLD);
00344 MPI_Type_free(&elem);
00345 return val;
00346 }