代码搜索:integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/164520/5489379
frm 点群分析f3.frm
VERSION 5.00
Begin VB.Form frmContinue
Appearance = 0 'Flat
BackColor = &H80000005&
Caption = "点群分析"
ClientHeight = 9600
ClientLeft = 60
www.eeworm.com/read/164520/5489583
bas 双因素m2.bas
Attribute VB_Name = "modMethod"
Option Explicit
'双因素方差分析
'x:试验数据,已知
'FA:列因素的F检验值,计算结果
'FB:行因素的F检验值,计算结果
Public Sub DoubleE(x() As Double, FA As Double, FB As Double)
Dim T As Double, T2 As
www.eeworm.com/read/164520/5489631
bas 描述统计m2.bas
Attribute VB_Name = "modMethod"
'描述统计的计算方法
Option Explicit
'数组排序的希尔方法
'按升序
'Y():被排序的数组
Public Sub Sort_Shell(Y() As Double)
Dim Temp As Double, Gap As Integer
Dim I As Integer, K As In
www.eeworm.com/read/164520/5489721
bas 二元多项式逐步回归m2.bas
Attribute VB_Name = "modMethod"
'二元多项式逐步回归
Option Explicit
'xMy(1 To n, 1 To m):处理后数据,n是观测次数,m是多项式的项数
'F1:指定的F临界值,用于引入
'F2:指定的F临界值,用于剔出
' 要求F1>=F2。如果F1=F2=0,则引入除线性相关外的全部变量
'F:F检验值,计算结果
'L:选
www.eeworm.com/read/164520/5489748
bas 趋势面分析m2.bas
Attribute VB_Name = "modMethod"
'趋势面分析
Option Explicit
'计算X和Y的乘幂
Public Sub Power(X, Y, I0, E, F)
Dim a As Integer, C As Integer
a = 0
SS1:
If ((a + 1) * (a + 2)) / 2 >= I0 Then
www.eeworm.com/read/164520/5489756
bas 两组判别m2.bas
Attribute VB_Name = "modMethod"
'两组判别
Option Explicit
'全主元高斯-约当消去法求逆矩阵
'A(1 To m, 1 To m):开始存放欲求逆的矩阵,最终存求逆的结果矩阵,m是自变量个数
Public Sub Invert(a() As Double)
Dim n As Integer, ep As Double
D
www.eeworm.com/read/162614/5523371
f90 bergervoet2.f90
function testi() result(res)
integer :: res
res = 0
end function testi
www.eeworm.com/read/162614/5523419
ada c87b09a.ada
-- C87B09A.ADA
-- Grant of Unlimited Rights
--
-- Under contracts F33600-87-D-0337, F33600-84-D-0280, MDA903-79-C-0687,
-- F08630-91-C-0015, and DCA100-97-D-0025,
www.eeworm.com/read/162614/5523425
ada c87b03a.ada
-- C87B03A.ADA
-- Grant of Unlimited Rights
--
-- Under contracts F33600-87-D-0337, F33600-84-D-0280, MDA903-79-C-0687,
-- F08630-91-C-0015, and DCA100-97-D-0025,
www.eeworm.com/read/162614/5523429
ada c83e02b.ada
-- C83E02B.ADA
-- Grant of Unlimited Rights
--
-- Under contracts F33600-87-D-0337, F33600-84-D-0280, MDA903-79-C-0687,
-- F08630-91-C-0015, and DCA100-97-D-0025,