loop9f90.f90		loop9f90.f90
	SUBROUTINE loop9_F90(N, a, x)		SUBROUTINE loop9_F90(N, a, x)
	INTEGER i, N		INTEGER i, N
	REAL*8 a(N), x(N)		REAL*8 a(N), x(N)
	x=x+a		x = x+a
	RETURN		RETURN
	END		END
	SUBROUTINE loop9_F90Overhead(N, a, x)		SUBROUTINE loop9_F90Overhead(N, a, x)
	INTEGER i, N		INTEGER i, N
	REAL*8 a(N), x(N)		REAL*8 a(N), x(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/