471
471
472
472
function _triscale! (A:: UpperTriangular , B:: UpperTriangular , c:: Number , _add)
473
473
n = checksquare (B)
474
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
474
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
475
475
for j = 1 : n
476
476
for i = 1 : j
477
477
@inbounds _modify! (_add, B. data[i,j] * c, A. data, (i,j))
@@ -481,8 +481,8 @@ function _triscale!(A::UpperTriangular, B::UpperTriangular, c::Number, _add)
481
481
end
482
482
function _triscale! (A:: UpperTriangular , c:: Number , B:: UpperTriangular , _add)
483
483
n = checksquare (B)
484
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
485
- for j = 1 : n
484
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
485
+ for j = 1 : n
486
486
for i = 1 : j
487
487
@inbounds _modify! (_add, c * B. data[i,j], A. data, (i,j))
488
488
end
@@ -491,7 +491,7 @@ function _triscale!(A::UpperTriangular, c::Number, B::UpperTriangular, _add)
491
491
end
492
492
function _triscale! (A:: UpperOrUnitUpperTriangular , B:: UnitUpperTriangular , c:: Number , _add)
493
493
n = checksquare (B)
494
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
494
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
495
495
for j = 1 : n
496
496
@inbounds _modify! (_add, c, A, (j,j))
497
497
for i = 1 : (j - 1 )
@@ -502,7 +502,7 @@ function _triscale!(A::UpperOrUnitUpperTriangular, B::UnitUpperTriangular, c::Nu
502
502
end
503
503
function _triscale! (A:: UpperOrUnitUpperTriangular , c:: Number , B:: UnitUpperTriangular , _add)
504
504
n = checksquare (B)
505
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
505
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
506
506
for j = 1 : n
507
507
@inbounds _modify! (_add, c, A, (j,j))
508
508
for i = 1 : (j - 1 )
@@ -513,7 +513,7 @@ function _triscale!(A::UpperOrUnitUpperTriangular, c::Number, B::UnitUpperTriang
513
513
end
514
514
function _triscale! (A:: LowerTriangular , B:: LowerTriangular , c:: Number , _add)
515
515
n = checksquare (B)
516
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
516
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
517
517
for j = 1 : n
518
518
for i = j: n
519
519
@inbounds _modify! (_add, B. data[i,j] * c, A. data, (i,j))
@@ -523,8 +523,8 @@ function _triscale!(A::LowerTriangular, B::LowerTriangular, c::Number, _add)
523
523
end
524
524
function _triscale! (A:: LowerTriangular , c:: Number , B:: LowerTriangular , _add)
525
525
n = checksquare (B)
526
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
527
- for j = 1 : n
526
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
527
+ for j = 1 : n
528
528
for i = j: n
529
529
@inbounds _modify! (_add, c * B. data[i,j], A. data, (i,j))
530
530
end
@@ -533,7 +533,7 @@ function _triscale!(A::LowerTriangular, c::Number, B::LowerTriangular, _add)
533
533
end
534
534
function _triscale! (A:: LowerOrUnitLowerTriangular , B:: UnitLowerTriangular , c:: Number , _add)
535
535
n = checksquare (B)
536
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
536
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
537
537
for j = 1 : n
538
538
@inbounds _modify! (_add, c, A, (j,j))
539
539
for i = (j + 1 ): n
@@ -544,7 +544,7 @@ function _triscale!(A::LowerOrUnitLowerTriangular, B::UnitLowerTriangular, c::Nu
544
544
end
545
545
function _triscale! (A:: LowerOrUnitLowerTriangular , c:: Number , B:: UnitLowerTriangular , _add)
546
546
n = checksquare (B)
547
- iszero (_add. alpha) && return _rmul_or_fill! (C , _add. beta)
547
+ iszero (_add. alpha) && return _rmul_or_fill! (A , _add. beta)
548
548
for j = 1 : n
549
549
@inbounds _modify! (_add, c, A, (j,j))
550
550
for i = (j + 1 ): n
0 commit comments