Lines Matching full:complex
3 * Test program for the COMPLEX Level 3 Blas.
54 COMPLEX ZERO, ONE
71 COMPLEX AA( NMAX*NMAX ), AB( NMAX, 2*NMAX ),
340 9995 FORMAT( ' TESTS OF THE COMPLEX LEVEL 3 BLAS', //' THE F',
381 COMPLEX ZERO
391 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
399 COMPLEX ALPHA, ALS, BETA, BLS
666 COMPLEX ZERO
676 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
684 COMPLEX ALPHA, ALS, BETA, BLS
945 COMPLEX ZERO, ONE
955 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
962 COMPLEX ALPHA, ALS
1255 COMPLEX ZERO
1265 COMPLEX A( NMAX, NMAX ), AA( NMAX*NMAX ), ALF( NALF ),
1273 COMPLEX ALPHA, ALS, BETA, BETS
1587 COMPLEX ZERO, ONE
1597 COMPLEX AA( NMAX*NMAX ), AB( 2*NMAX*NMAX ),
1605 COMPLEX ALPHA, ALS, BETA, BETS
1966 COMPLEX ALPHA, BETA
1969 COMPLEX A( 2, 1 ), B( 2, 1 ), C( 2, 1 )
2889 COMPLEX ZERO, ONE
2891 COMPLEX ROGUE
2898 COMPLEX TRANSL
2904 COMPLEX A( NMAX, * ), AA( * )
2909 COMPLEX CBEG
3014 COMPLEX ZERO
3019 COMPLEX ALPHA, BETA
3025 COMPLEX A( LDA, * ), B( LDB, * ), C( LDC, * ),
3029 COMPLEX CL
3202 COMPLEX RI( * ), RJ( * )
3238 COMPLEX AA( LDA, * ), AS( LDA, * )
3281 COMPLEX FUNCTION CBEG( RESET )
3283 * Generates complex numbers as pairs of random numbers uniformly