Go backward to Vector Reductions Go up to Top Go forward to Loop Distribution

Example

Matrix multiplication

Fortran 77 source program

4 DO I = 1, N
5   DO J = 1, N
6     C(I,J) = 0
7     DO K = 1, N
8       C(I,J) = C(I,J)+A(I,K)*B(K,J)
      ENDDO
    ENDDO
  ENDDO

(See additional slide)