Home
last modified time | relevance | path

Searched refs:DBTRUE (Results 1 – 2 of 2) sorted by relevance

/external/eigen/blas/testing/
Ddblat1.f95 DOUBLE PRECISION DA1(8), DATRUE(8), DB1(8), DBTRUE(8), DC1(8), local
112 DATA DBTRUE/0.0D0, 0.6D0, 0.0D0, -0.6D0, 0.0D0,
120 DBTRUE(1) = 1.0D0/0.6D0
121 DBTRUE(3) = -1.0D0/0.6D0
122 DBTRUE(5) = 1.0D0/0.6D0
134 CALL STEST1(SB,DBTRUE(K),DBTRUE(K),SFAC)
Dsblat1.f95 REAL DA1(8), DATRUE(8), DB1(8), DBTRUE(8), DC1(8), local
112 DATA DBTRUE/0.0E0, 0.6E0, 0.0E0, -0.6E0, 0.0E0,
120 DBTRUE(1) = 1.0E0/0.6E0
121 DBTRUE(3) = -1.0E0/0.6E0
122 DBTRUE(5) = 1.0E0/0.6E0
134 CALL STEST1(SB,DBTRUE(K),DBTRUE(K),SFAC)