@@ -836,52 +836,36 @@ end
836836
837837function _trirdiv! (A:: UpperTriangular , B:: UpperOrUnitUpperTriangular , c:: Number )
838838 checksize1 (A, B)
839- isunit = B isa UnitUpperTriangular
840839 for j in axes (B,2 )
841- for i in firstindex (B,1 ): j- isunit
842- @inbounds A. data[i, j] = B. data[i, j] / c
843- end
844- if isunit
845- @inbounds A. data[j, j] = B[BandIndex (0 ,j)] / c
840+ for i in firstindex (B,1 ): j
841+ @inbounds A[i, j] = B[i, j] / c
846842 end
847843 end
848844 return A
849845end
850846function _trirdiv! (A:: LowerTriangular , B:: LowerOrUnitLowerTriangular , c:: Number )
851847 checksize1 (A, B)
852- isunit = B isa UnitLowerTriangular
853848 for j in axes (B,2 )
854- if isunit
855- @inbounds A. data[j, j] = B[BandIndex (0 ,j)] / c
856- end
857- for i in j+ isunit: lastindex (B,1 )
858- @inbounds A. data[i, j] = B. data[i, j] / c
849+ for i in j: lastindex (B,1 )
850+ @inbounds A[i, j] = B[i, j] / c
859851 end
860852 end
861853 return A
862854end
863855function _trildiv! (A:: UpperTriangular , c:: Number , B:: UpperOrUnitUpperTriangular )
864856 checksize1 (A, B)
865- isunit = B isa UnitUpperTriangular
866857 for j in axes (B,2 )
867- for i in firstindex (B,1 ): j- isunit
868- @inbounds A. data[i, j] = c \ B. data[i, j]
869- end
870- if isunit
871- @inbounds A. data[j, j] = c \ B[BandIndex (0 ,j)]
858+ for i in firstindex (B,1 ): j
859+ @inbounds A[i, j] = c \ B[i, j]
872860 end
873861 end
874862 return A
875863end
876864function _trildiv! (A:: LowerTriangular , c:: Number , B:: LowerOrUnitLowerTriangular )
877865 checksize1 (A, B)
878- isunit = B isa UnitLowerTriangular
879866 for j in axes (B,2 )
880- if isunit
881- @inbounds A. data[j, j] = c \ B[BandIndex (0 ,j)]
882- end
883- for i in j+ isunit: lastindex (B,1 )
884- @inbounds A. data[i, j] = c \ B. data[i, j]
867+ for i in j: lastindex (B,1 )
868+ @inbounds A[i, j] = c \ B[i, j]
885869 end
886870 end
887871 return A
0 commit comments