@@ -20,7 +20,7 @@ function changebonds(ψ::AbstractFiniteMPS, alg::SvdCut; kwargs...)
2020end
2121function changebonds! (ψ:: AbstractFiniteMPS , alg:: SvdCut ; normalize:: Bool = true )
2222 for i in (length (ψ) - 1 ): - 1 : 1
23- U, S, V, = tsvd (ψ. C[i]; trunc= alg. trscheme, alg= alg. alg_svd)
23+ U, S, V = tsvd (ψ. C[i]; trunc= alg. trscheme, alg= alg. alg_svd)
2424 AL′ = ψ. AL[i] * U
2525 ψ. AC[i] = (AL′, complex (S))
2626 AR′ = _transpose_front (V * _transpose_tail (ψ. AR[i + 1 ]))
@@ -44,7 +44,7 @@ function changebonds!(mpo::FiniteMPO, alg::SvdCut)
4444 O_left = transpose (mpo[1 ], ((3 , 1 , 2 ), (4 ,)))
4545 local O_right
4646 for i in 2 : length (mpo)
47- U, S, V, = tsvd! (O_left; trunc= alg. trscheme, alg= alg. alg_svd)
47+ U, S, V = tsvd! (O_left; trunc= alg. trscheme, alg= alg. alg_svd)
4848 @inbounds mpo[i - 1 ] = transpose (U, ((2 , 3 ), (1 , 4 )))
4949 if i < length (mpo)
5050 @plansor O_left[- 3 - 1 - 2 ; - 4 ] := S[- 1 ; 1 ] * V[1 ; 2 ] * mpo[i][2 - 2 ; - 3 - 4 ]
@@ -55,7 +55,7 @@ function changebonds!(mpo::FiniteMPO, alg::SvdCut)
5555
5656 # right to left
5757 for i in (length (mpo) - 1 ): - 1 : 1
58- U, S, V, = tsvd! (O_right; trunc= alg. trscheme, alg= alg. alg_svd)
58+ U, S, V = tsvd! (O_right; trunc= alg. trscheme, alg= alg. alg_svd)
5959 @inbounds mpo[i + 1 ] = transpose (V, ((1 , 4 ), (2 , 3 )))
6060 if i > 1
6161 @plansor O_right[- 1 ; - 3 - 4 - 2 ] := mpo[i][- 1 - 2 ; - 3 2 ] * U[2 ; 1 ] * S[1 ; - 4 ]
@@ -84,7 +84,7 @@ function changebonds(ψ::InfiniteMPS, alg::SvdCut)
8484 ncr = ψ. C[1 ]
8585
8686 for i in 1 : length (ψ)
87- U, ncr, = tsvd (ψ. C[i]; trunc= alg. trscheme, alg= alg. alg_svd)
87+ U, ncr = tsvd (ψ. C[i]; trunc= alg. trscheme, alg= alg. alg_svd)
8888 copied[i] = copied[i] * U
8989 copied[i + 1 ] = _transpose_front (U' * _transpose_tail (copied[i + 1 ]))
9090 end
0 commit comments