Location:
Search - kx-d
Search list
Description: 康芯FPGA开发竞赛板kx-dvp3f的电路图-Kangxin FPGA development board kx-dvp3f circuit race
Platform: |
Size: 56320 |
Author: liaocongliang |
Hits:
Description: C *** **** PROGRAM GENEIGEN *** **
IMPLICIT DOUBLE PRECISION (A-H,O-Z)
DIMENSION S(100,100),GM(100,100),NORD(100),D(100),B(99)
CHARACTER*16 FILE1,FILE2
CHARACTER*81 DUMMY
PRINT *, ********************************************
PRINT *, * GENERALIZED EIGENVALUE PROBLEM *
PRINT *, * Kx = lambda Mx *
PRINT *, * IMPLICIT SHIFT METHOD OF WILKINSON *
PRINT *, * T.R.Chandrupatla and A.D.Belegundu *
PRINT *, ********************************************
IMAX = 100
PI = 3.14159
-C ********** PROGRAM GENEIGEN ********
IMPLICIT DOUBLE PRECISION (A-H,O-Z)
DIMENSION S(100,100),GM(100,100),NORD(100),D(100),B(99)
CHARACTER*16 FILE1,FILE2
CHARACTER*81 DUMMY
PRINT *, ********************************************
PRINT *, * GENERALIZED EIGENVALUE PROBLEM *
PRINT *, * Kx = lambda Mx *
PRINT *, * IMPLICIT SHIFT METHOD OF WILKINSON *
PRINT *, * T.R.Chandrupatla and A.D.Belegundu *
PRINT *, ********************************************
IMAX = 100
PI = 3.14159
Platform: |
Size: 2048 |
Author: apm |
Hits:
Description: C *** **** PROGRAM GENEIGEN *** **
IMPLICIT DOUBLE PRECISION (A-H,O-Z)
DIMENSION S(100,100),GM(100,100),NORD(100),D(100),B(99)
CHARACTER*16 FILE1,FILE2
CHARACTER*81 DUMMY
PRINT *, ********************************************
PRINT *, * GENERALIZED EIGENVALUE PROBLEM *
PRINT *, * Kx = lambda Mx *
PRINT *, * IMPLICIT SHIFT METHOD OF WILKINSON *
PRINT *, * T.R.Chandrupatla and A.D.Belegundu *
PRINT *, ********************************************
IMAX = 100
PI = 3.14159
-C ********** PROGRAM GENEIGEN ********
IMPLICIT DOUBLE PRECISION (A-H,O-Z)
DIMENSION S(100,100),GM(100,100),NORD(100),D(100),B(99)
CHARACTER*16 FILE1,FILE2
CHARACTER*81 DUMMY
PRINT *, ********************************************
PRINT *, * GENERALIZED EIGENVALUE PROBLEM *
PRINT *, * Kx = lambda Mx *
PRINT *, * IMPLICIT SHIFT METHOD OF WILKINSON *
PRINT *, * T.R.Chandrupatla and A.D.Belegundu *
PRINT *, ********************************************
IMAX = 100
PI = 3.14159
Platform: |
Size: 2048 |
Author: apm |
Hits:
Description: {缠论}
TIM:=TDXDLL4(100,PERIOD,H,L); {初始化周期};
KX:=TDXDLL4(1,H,L,C); {解决包含K线的问题};
VALID:=TDXDLL4(15,H,L,C);
BI:=TDXDLL4(4,H,L,C); {BI类型}
KXG:=TDXDLL4(2,H,L,C); {高点}
KXD:=TDXDLL4(3,H,L,C); {低点}
BILAST:=TDXDLL4(6,H,L,C);{上一笔的距离}
{(initialization; initialize; initialise; initializtion)
Platform: |
Size: 18432 |
Author: zhaodao |
Hits: