代码搜索结果

/* lzo1f_f2.s -- fast LZO1F decompression in assembler (i386 + gcc) This file is part of the LZO real-time data compression library. Copyright (C) 1996-2002 Markus Franz Xaver Johannes Oberhum

/* * f1f2decl.h - Function declarations of Transaction library * Kernel of GNU SQL-server * * This file is a part of GNU SQL Server * * Copyright (c) 1996, 1997, Free Softwar

!********************************************************************** ! pi3f90.f - compute pi by integrating f(x) = 4/(1 + x**2) ! ! Each node: ! 1) receives the number of rectangl

SUBROUTINE loop5_F90(N, x, a, b) INTEGER i, N REAL*8 x(N), a(N), b(N) x=a+b RETURN END SUBROUTINE loop5_F90Overhead(N, x, a, b) INTEGER i, N RE

SUBROUTINE loop18_F90(N, x, a, b, u, v) INTEGER i, N REAL*8 x(N), a(N), b(N), u, v x=(u+a)*(v+b) RETURN END SUBROUTINE loop18_F90Overhead(N, x, a, b, u, v)

SUBROUTINE loop13_F90(N, x, a, b, c, d, y, u) INTEGER i, N REAL*8 x(N), a(N), b(N), c(N), d(N), y(N), u x=a+b+c+d y=u+d RETURN END SUBROUTINE loop1

SUBROUTINE loop12_F90(N, y, a, x, b, c, d, u) INTEGER i, N REAL*8 y(N), a(N), x(N), b(N), c(N), d(N), u y=u+a x=a+b+c+d RETURN END SUBROUTINE loop1

SUBROUTINE loop3_F90(N, x, y, a) INTEGER i, N REAL*8 x(N), y(N), a y=y+a*x RETURN END SUBROUTINE loop3_F90Overhead(N, x, y, a) INTEGER i, N REA

SUBROUTINE loop22_F90(N, x, a, b, c, d) INTEGER i, N REAL*8 x(N), a(N), b(N), c(N), d(N) x=x+a*b+c*d RETURN END SUBROUTINE loop22_F90Overhead(N, x, a, b, c

SUBROUTINE loop11_F90(N, x, a, b, c, d) INTEGER i, N REAL*8 x(N), a(N), b(N), c(N), d(N) x=a+b+c+d RETURN END SUBROUTINE loop11_F90Overhead(N, x, a, b, c,