Lines Matching full:abs1
2911 DOUBLE PRECISION ABS1
2913 ABS1( C ) = ABS( DBLE( C ) ) + ABS( DIMAG( C ) )
2950 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2956 G( IY ) = G( IY ) + ABS1( A( J, I ) )*ABS1( X( JX ) )
2962 G( IY ) = G( IY ) + ABS1( A( I, J ) )*ABS1( X( JX ) )
2967 G( IY ) = ABS1( ALPHA )*G( IY ) + ABS1( BETA )*ABS1( Y( IY ) )
