@@ -21,7 +21,7 @@ $(TYPEDFIELDS)
2121 verbosity:: Int = VERBOSE_WARN
2222
2323 " algorithm used for orthogonalization of the tensors"
24- alg_orth = Defaults. alg_qr ()
24+ alg_orth = Defaults. alg_orth ()
2525 " algorithm used for the eigensolver"
2626 alg_eigsolve = _GAUGE_ALG_EIGSOLVE
2727 " minimal amount of iterations before using the eigensolver steps"
@@ -46,7 +46,7 @@ $(TYPEDFIELDS)
4646 verbosity:: Int = VERBOSE_WARN
4747
4848 " algorithm used for orthogonalization of the tensors"
49- alg_orth = Defaults. alg_lq ()
49+ alg_orth = Defaults. alg_orth ()
5050 " algorithm used for the eigensolver"
5151 alg_eigsolve = _GAUGE_ALG_EIGSOLVE
5252 " minimal amount of iterations before using the eigensolver steps"
7373
7474function MixedCanonical (;
7575 tol:: Real = Defaults. tolgauge, maxiter:: Int = Defaults. maxiter,
76- verbosity:: Int = VERBOSE_WARN, alg_orth = Defaults. alg_qr (),
76+ verbosity:: Int = VERBOSE_WARN, alg_orth = Defaults. alg_orth (),
7777 alg_eigsolve = _GAUGE_ALG_EIGSOLVE,
7878 eig_miniter:: Int = 10 , order:: Symbol = :LR
7979 )
80- if alg_orth isa LAPACK_HouseholderQR
81- alg_leftorth = alg_orth
82- alg_rightorth = LAPACK_HouseholderLQ (; alg_orth. kwargs... )
83- elseif alg_orth isa CUSOLVER_HouseholderQR
84- alg_leftorth = alg_orth
85- alg_rightorth = LQViaTransposedQR (CUSOLVER_HouseholderQR (; alg_orth. kwargs... ))
86- elseif alg_orth isa LAPACK_HouseholderLQ
87- alg_leftorth = LAPACK_HouseholderQR (; alg_orth. kwargs... )
88- alg_rightorth = alg_orth
89- elseif alg_orth isa LQViaTransposedQR
90- alg_leftorth = alg_orth
91- alg_rightorth = alg_orth. qr_alg
92- else
93- alg_leftorth = alg_rightorth = alg_orth
94- end
95-
9680 left = LeftCanonical (;
97- tol, maxiter, verbosity, alg_orth = alg_leftorth , alg_eigsolve, eig_miniter
81+ tol, maxiter, verbosity, alg_orth, alg_eigsolve, eig_miniter
9882 )
9983 right = RightCanonical (;
100- tol, maxiter = maxiter, verbosity, alg_orth = alg_rightorth , alg_eigsolve, eig_miniter
84+ tol, maxiter = maxiter, verbosity, alg_orth, alg_eigsolve, eig_miniter
10185 )
10286
10387 return MixedCanonical (left, right, order)
@@ -168,7 +152,7 @@ performance for accuracy.
168152regauge!
169153
170154function regauge! (
171- AC:: GenericMPSTensor , C:: MPSBondTensor ; alg = Defaults. alg_qr ()
155+ AC:: GenericMPSTensor , C:: MPSBondTensor ; alg = Defaults. alg_orth ()
172156 )
173157 Q_AC, _ = left_orth! (AC; alg)
174158 Q_C, _ = left_orth! (C; alg)
@@ -181,7 +165,7 @@ function regauge!(AC::AbstractVector{<:GenericMPSTensor}, C::AbstractVector{<:MP
181165 return AC
182166end
183167function regauge! (
184- CL:: MPSBondTensor , AC:: GenericMPSTensor ; alg = Defaults. alg_lq ()
168+ CL:: MPSBondTensor , AC:: GenericMPSTensor ; alg = Defaults. alg_orth ()
185169 )
186170 AC_tail = _transpose_tail (AC)
187171 _, Q_AC = right_orth! (AC_tail; alg)
0 commit comments