Lines Matching full:cmplx
1778 INTRINSIC ABS, CMPLX, CONJG, MAX, REAL
1835 ALPHA = CMPLX( RALPHA, RZERO )
2718 INTRINSIC CMPLX, CONJG, MAX, MIN, REAL
2749 $ A( J, J ) = CMPLX( REAL( A( J, J ) ), RZERO )
2807 AA( JJ ) = CMPLX( REAL( AA( JJ ) ), RROGUE )
2840 AA( JJ ) = CMPLX( REAL( AA( JJ ) ), RROGUE )
2860 $ AA( IOFF ) = CMPLX( REAL( AA( IOFF ) ), RROGUE )
3110 INTRINSIC CMPLX
3138 CBEG = CMPLX( ( I - 500 )/1001.0, ( J - 500 )/1001.0 )
