代码搜索:integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/237328/13968790
pas unttool.pas
{******************************************************************************
* Unit untTool
* Module is support some tools function to the main module
* CopyRight (C) By GanHuaXin 2001
*
www.eeworm.com/read/237328/13968796
~pas unttool.~pas
{******************************************************************************
* Unit untTool
* Module is support some tools function to the main module
* CopyRight (C) By GanHuaXin 2001
*
www.eeworm.com/read/237155/13972894
txt diodesc.txt
* ----------------------------------------------------------------------
* File : DIODESC.TXT
* Creator : Blake Miller
* Version : 01.01.00 February 1991
* Purpos
www.eeworm.com/read/134646/13978581
txt pl/0编译程序.txt
PL/0编译程序
1)PL/0编译程序
program plO(input,output,ff,fi,fw2);{带有代码生成的PL/0编译程序}
label 99;
const norw=13; {保留字个数}
txmax=100, {标识符表的长度}
nmax=14, {数中数字的最大个数}
a1=10;
www.eeworm.com/read/237003/13983382
f90 loop5f90.f90
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
www.eeworm.com/read/237003/13983427
f90 loop3f90.f90
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
www.eeworm.com/read/237003/13983509
f90 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
www.eeworm.com/read/237003/13983519
f90 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*
www.eeworm.com/read/237003/13983614
f90 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
www.eeworm.com/read/237003/13983621
f90 loop2f90.f90
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
REAL*