Lines Matching refs:RALPHA
1769 DOUBLE PRECISION ERR, ERRMAX, RALPHA, RALS local
1840 RALPHA = DBLE( ALF( IA ) )
1841 ALPHA = DCMPLX( RALPHA, RZERO )
1842 NULL = N.LE.0.OR.RALPHA.EQ.RZERO
1856 RALS = RALPHA
1871 $ RALPHA, INCX, LDA
1874 CALL ZHER( UPLO, N, RALPHA, XX, INCX, AA, LDA )
1878 $ RALPHA, INCX
1881 CALL ZHPR( UPLO, N, RALPHA, XX, INCX, AA )
1896 ISAME( 3 ) = RALS.EQ.RALPHA
1992 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
1994 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2362 DOUBLE PRECISION RALPHA local
2620 CALL ZHER( '/', 0, RALPHA, X, 1, A, 1 )
2623 CALL ZHER( 'U', -1, RALPHA, X, 1, A, 1 )
2626 CALL ZHER( 'U', 0, RALPHA, X, 0, A, 1 )
2629 CALL ZHER( 'U', 2, RALPHA, X, 1, A, 1 )
2633 CALL ZHPR( '/', 0, RALPHA, X, 1, A )
2636 CALL ZHPR( 'U', -1, RALPHA, X, 1, A )
2639 CALL ZHPR( 'U', 0, RALPHA, X, 0, A )