Lines Matching full:abs1
2903 REAL ABS1
2905 ABS1( C ) = ABS( REAL( C ) ) + ABS( AIMAG( C ) )
2942 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2948 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2954 G( IY ) = G( IY ) + ABS1( A( I, J ) )*ABS1( X( JX ) )
2959 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )