High performance FORTRAN FORALL example.