代码搜索结果

找到约 10,000 项符合 F 的代码

loop1f90.f90

SUBROUTINE loop1_F90(N, x, y) INTEGER i, N REAL*8 x(N), y(N) x=sqrt(y) RETURN END SUBROUTINE loop1_F90Overhead(N, x, y) INTEGER i, N REAL*8 x(N

loop23f90.f90

SUBROUTINE loop23_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*b+c*d y=b+d RETURN END SUBROUTINE loop23_F90O

loop10f90.f90

SUBROUTINE loop10_F90(N, x, a, b, c, u) INTEGER i, N REAL*8 x(N), a(N), b(N), c(N), u x=u+a+b+c RETURN END SUBROUTINE loop10_F90Overhead(N, x, a, b, c, u)

loop4f90.f90

SUBROUTINE loop4_F90(niters, N, x, a, b) INTEGER i, iter, niters, N REAL*8 x(N), a(N), b(N) DO iter=1,niters x=a+b END DO RETURN END

loop6f90.f90

SUBROUTINE loop6_F90(N, x, a, b) INTEGER i, N REAL*8 x(N), a(N), b(N) x=a*b RETURN END SUBROUTINE loop6_F90Overhead(N, x, a, b) INTEGER i, N RE

loop8f90.f90

SUBROUTINE loop8_F90(N, a, x, u) INTEGER i, N REAL*8 a(N), x(N), u x=u/a RETURN END SUBROUTINE loop8_F90Overhead(N, a, x, u) INTEGER i, N REAL*

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