loop11f.f		loop11f.f
	SUBROUTINE loop11_F77(N, x, a, b, c, d)		SUBROUTINE loop11_F77(N, x, a, b, c, d)
	INTEGER i, N		INTEGER i, N
	REAL*8 x(N), a(N), b(N), c(N), d(N)		REAL*8 x(N), a(N), b(N), c(N), d(N)
	DO i=1,N		DO i=1,N
	x(i)=a(i)+b(i)+c(i)+d(i)		x(i) = a(i)+b(i)+c(i)+d(i);
	END DO		END DO
	RETURN		RETURN
	END		END
	SUBROUTINE loop11_F77Overhead(N, x, a, b, c, d)		SUBROUTINE loop11_F77Overhead(N, x, a, b, c, d)
	INTEGER i, N		INTEGER i, N
	REAL*8 x(N), a(N), b(N), c(N), d(N)		REAL*8 x(N), a(N), b(N), c(N), d(N)
	RETURN		RETURN
	END		END
End of changes. 2 change blocks.
	1 lines changed or deleted		2 lines changed or added
This html diff was produced by rfcdiff 1.41. The latest version is available from http://tools.ietf.org/tools/rfcdiff/