代码搜索结果
找到约 10,000 项符合
F 的代码
loop25f90.f90
SUBROUTINE loop25_F90(N, x, a, b, c, y, u, v, w)
INTEGER i, N
REAL*8 x(N), a(N), b(N), c(N), y(N), u, v, w
x=u*b
y=v*b+w*a+u*c
RETURN
END
SUBROUTIN
loop36f90.f90
SUBROUTINE loop36_F90(N, x, e)
INTEGER i, N
REAL*8 x(N), e(N)
x=exp(e)
RETURN
END
SUBROUTINE loop36_F90Overhead(N, x, e)
INTEGER i, N
REAL*8 x(
loop14f90.f90
SUBROUTINE loop14_F90(N, x, a, b, y)
INTEGER i, N
REAL*8 x(N), a(N), b(N), y(N)
x=a+b
y=a-b
RETURN
END
SUBROUTINE loop14_F90Overhead(N, x, a, b, y)
loop16f90.f90
SUBROUTINE loop16_F90(N, x, a, b, c, y, u)
INTEGER i, N
REAL*8 x(N), a(N), b(N), c(N), y(N), u
x=a+b+c
y=x+c+u
RETURN
END
SUBROUTINE loop16_F90Over
loop17f90.f90
SUBROUTINE loop17_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 loop17_F90Overhead(N, x, a, b,
loop15f90.f90
SUBROUTINE loop15_F90(N, x, c, a, b)
INTEGER i, N
REAL*8 x(N), c(N), a(N), b(N)
x=c+a*b
RETURN
END
SUBROUTINE loop15_F90Overhead(N, x, c, a, b)
INTEG
loop19f90.f90
SUBROUTINE loop19_F90(N, x, a, b, y, u, v)
INTEGER i, N
REAL*8 x(N), a(N), b(N), y(N), u, v
x=u*a
y=v*b
RETURN
END
SUBROUTINE loop19_F90Overhead(N,
loop24f90.f90
SUBROUTINE loop24_F90(N, x, a, b, c, d, y)
INTEGER i, N
REAL*8 x(N), a(N), b(N), c(N), d(N), y(N)
x=a*c-b*d
y=a*d+b*c
RETURN
END
SUBROUTINE loop24_
loop21f90.f90
SUBROUTINE loop21_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 loop21_F90Overhead(N, x, a, b, c,
loop9f90.f90
SUBROUTINE loop9_F90(N, a, x)
INTEGER i, N
REAL*8 a(N), x(N)
x=x+a
RETURN
END
SUBROUTINE loop9_F90Overhead(N, a, x)
INTEGER i, N
REAL*8 a(N), x