Lines Matching refs:SUMR
191 $ SMLNUM, SUML, SUMR, XNORM local
320 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
321 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
350 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
351 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
355 SUMR = DDOT( L1-1, C( K2, 1 ), LDC, B( 1, L1 ), 1 )
356 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
377 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
378 VEC( 1, 1 ) = SGN*( C( K1, L1 )-( SUML+SGN*SUMR ) )
382 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L2 ), 1 )
383 VEC( 2, 1 ) = SGN*( C( K1, L2 )-( SUML+SGN*SUMR ) )
404 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
405 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
409 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L2 ), 1 )
410 VEC( 1, 2 ) = C( K1, L2 ) - ( SUML+SGN*SUMR )
414 SUMR = DDOT( L1-1, C( K2, 1 ), LDC, B( 1, L1 ), 1 )
415 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
419 SUMR = DDOT( L1-1, C( K2, 1 ), LDC, B( 1, L2 ), 1 )
420 VEC( 2, 2 ) = C( K2, L2 ) - ( SUML+SGN*SUMR )
504 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
505 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
533 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
534 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
537 SUMR = DDOT( L1-1, C( K2, 1 ), LDC, B( 1, L1 ), 1 )
538 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
558 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
559 VEC( 1, 1 ) = SGN*( C( K1, L1 )-( SUML+SGN*SUMR ) )
562 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L2 ), 1 )
563 VEC( 2, 1 ) = SGN*( C( K1, L2 )-( SUML+SGN*SUMR ) )
583 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L1 ), 1 )
584 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
587 SUMR = DDOT( L1-1, C( K1, 1 ), LDC, B( 1, L2 ), 1 )
588 VEC( 1, 2 ) = C( K1, L2 ) - ( SUML+SGN*SUMR )
591 SUMR = DDOT( L1-1, C( K2, 1 ), LDC, B( 1, L1 ), 1 )
592 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
595 SUMR = DDOT( L1-1, C( K2, 1 ), LDC, B( 1, L2 ), 1 )
596 VEC( 2, 2 ) = C( K2, L2 ) - ( SUML+SGN*SUMR )
679 SUMR = DDOT( N-L1, C( K1, MIN( L1+1, N ) ), LDC,
681 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
709 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
711 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
714 SUMR = DDOT( N-L2, C( K2, MIN( L2+1, N ) ), LDC,
716 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
736 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
738 VEC( 1, 1 ) = SGN*( C( K1, L1 )-( SUML+SGN*SUMR ) )
741 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
743 VEC( 2, 1 ) = SGN*( C( K1, L2 )-( SUML+SGN*SUMR ) )
763 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
765 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
768 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
770 VEC( 1, 2 ) = C( K1, L2 ) - ( SUML+SGN*SUMR )
773 SUMR = DDOT( N-L2, C( K2, MIN( L2+1, N ) ), LDC,
775 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
778 SUMR = DDOT( N-L2, C( K2, MIN( L2+1, N ) ), LDC,
780 VEC( 2, 2 ) = C( K2, L2 ) - ( SUML+SGN*SUMR )
864 SUMR = DDOT( N-L1, C( K1, MIN( L1+1, N ) ), LDC,
866 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
895 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
897 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
901 SUMR = DDOT( N-L2, C( K2, MIN( L2+1, N ) ), LDC,
903 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
924 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
926 VEC( 1, 1 ) = SGN*( C( K1, L1 )-( SUML+SGN*SUMR ) )
930 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
932 VEC( 2, 1 ) = SGN*( C( K1, L2 )-( SUML+SGN*SUMR ) )
953 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
955 VEC( 1, 1 ) = C( K1, L1 ) - ( SUML+SGN*SUMR )
959 SUMR = DDOT( N-L2, C( K1, MIN( L2+1, N ) ), LDC,
961 VEC( 1, 2 ) = C( K1, L2 ) - ( SUML+SGN*SUMR )
965 SUMR = DDOT( N-L2, C( K2, MIN( L2+1, N ) ), LDC,
967 VEC( 2, 1 ) = C( K2, L1 ) - ( SUML+SGN*SUMR )
971 SUMR = DDOT( N-L2, C( K2, MIN( L2+1, N ) ), LDC,
973 VEC( 2, 2 ) = C( K2, L2 ) - ( SUML+SGN*SUMR )