reduction.f90 2.89 KB