代码搜索结果
找到约 10,000 项符合
F 的代码
f_log10f.s
/*
* ====================================================
* Copyright (C) 1998, 2002 by Red Hat Inc. All rights reserved.
*
* Permission to use, copy, modify, and distribute this
* softw
_x___s_f_f.h
////////////////////////////////////////////////////////////////////////////////
// ____ ____
// / /\/ /
// /___/ \ /
// \ \ \/
// \ \ Copyright (c) 2003-2004 X
loop5f90.f
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,
loop15f90.f
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)
loop36f90.f
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
loop6f90.f
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,
loop8f90.f
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
loop19f90.f
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_F90O
loop2f90.f
SUBROUTINE loop2_F90(N, x, y, u)
INTEGER i, N
REAL*8 x(N), y(N), u
x=y/u
RETURN
END
SUBROUTINE loop2_F90Overhead(N, x, y, u)
INTEGER i, N
loop9f90.f
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
REA