Reduction operation

 

$username@machine [~/temp2] % mpxlf -O3 -o reduce reduce.f
$username@machine [~/temp2] % poe reduce -procs 3 -rmpool 1
sum = 45.00000000