代码搜索结果
找到约 10,000 项符合
F 的代码
loop16f.f
SUBROUTINE loop16_F77(N, x, a, b, c, y, u)
INTEGER i, N
REAL*8 x(N), a(N), b(N), c(N), y(N), u
DO i=1,N
x(i)=a(i)+b(i)+c(i)
y(i)=x(i)+c(i)+u
END DO
loop13f.f
SUBROUTINE loop13_F77(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
DO i=1,N
x(i)=a(i)+b(i)+c(i)+d(i)
y(i)=u+d(i)
loop36f.f
SUBROUTINE loop36_F77(N, x, e)
INTEGER i, N
REAL*8 x(N), e(N)
DO i=1,N
x(i)=exp(e(i))
END DO
RETURN
END
SUBROUTINE loop36_F77Overhead(N, x,
loop25f.f
SUBROUTINE loop25_F77(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
DO i=1,N
x(i)=u*b(i)
y(i)=v*b(i)+w*a(i)+u*c(i)
loop23f.f
SUBROUTINE loop23_F77(N, x, a, b, c, d, y)
INTEGER i, N
REAL*8 x(N), a(N), b(N), c(N), d(N), y(N)
DO i=1,N
x(i)=a(i)*b(i)+c(i)*d(i)
y(i)=b(i)+d(i)
EN
loop5f.f
SUBROUTINE loop5_F77(N, x, a, b)
INTEGER i, N
REAL*8 x(N), a(N), b(N)
DO i=1,N
x(i)=a(i)+b(i)
END DO
RETURN
END
SUBROUTINE loop5_F77Overhea
loop21f.f
SUBROUTINE loop21_F77(N, x, a, b, c, d)
INTEGER i, N
REAL*8 x(N), a(N), b(N), c(N), d(N)
DO i=1,N
x(i)=a(i)*b(i)+c(i)*d(i)
END DO
RETURN
END
loop3f.f
SUBROUTINE loop3_F77(N, x, y, a)
INTEGER i, N
REAL*8 x(N), y(N), a
DO i=1,N
y(i)=y(i)+a*x(i)
END DO
RETURN
END
SUBROUTINE loop3_F77Overhead
loop6f.f
SUBROUTINE loop6_F77(N, x, a, b)
INTEGER i, N
REAL*8 x(N), a(N), b(N)
DO i=1,N
x(i)=a(i)*b(i)
END DO
RETURN
END
SUBROUTINE loop6_F77Overhea
gng_teach.ps
%!PS-Adobe-2.0 EPSF-2.0
%%Title: /home/loos/DemoGNG-1.3/tex/eps/GNG_Teach.ps
%%Creator: XV Version 3.10a Rev: 12/29/94 - by John Bradley
%%BoundingBox: 35 289 561 553
%%Pages: 1
%%DocumentFonts:
%%