Listing 4: Integral function example running on 1000 compute nodes.

 program ZeroToOne
  {
   double x;    // temporary variable
   // compute value for part of the interval
   x = ( id() + 0.5) / NUM_PPUS;
   Interval = (4.0 / (1.0 + x * x));
   barrier; // synchronize with result unit
  }