@@ -187,7 +187,7 @@ for V in spacelist
187187 end
188188 @test @constinferred (removeunit (t3, $ (numind (t3)))) == t
189189 t4 = @constinferred insertrightunit (t, 3 ; dual = true )
190- @test numin (t4) == numin (t) && numout (t4) == numout (t) + 1
190+ @test_broken numin (t4) == numin (t) && numout (t4) == numout (t) + 1
191191 for (c, b) in blocks (t)
192192 @test b == block (t4, c)
193193 end
@@ -539,9 +539,7 @@ for V in spacelist
539539 t1 = CUDA. rand (T, V3 ⊗ V4 ⊗ V5, (V1 ⊗ V2)' )
540540 t2 = CUDA. rand (T, (V3 ⊗ V4 ⊗ V5)' , V1 ⊗ V2)
541541 end
542- CUDA. @allowscalar begin
543- t = @constinferred (t1 ⊗ t2)
544- end
542+ t = @constinferred (t1 ⊗ t2)
545543 @test norm (t) ≈ norm (t1) * norm (t2)
546544 end
547545 end
@@ -553,22 +551,18 @@ for V in spacelist
553551 d2 = dim (codomain (t2))
554552 d3 = dim (domain (t1))
555553 d4 = dim (domain (t2))
556- CUDA. @allowscalar begin
557- t = @constinferred (t1 ⊗ t2)
558- At = ad (t)
559- @test ad (t) ≈ ad (t1) ⊗ ad (t2)
560- end
554+ t = @constinferred (t1 ⊗ t2)
555+ At = ad (t)
556+ @test ad (t) ≈ ad (t1) ⊗ ad (t2)
561557 end
562558 end
563559 symmetricbraiding && @timedtestset " Tensor product: test via tensor contraction" begin
564560 for T in (Float32, ComplexF64)
565561 t1 = CUDA. rand (T, V2 ⊗ V3 ⊗ V1)
566562 t2 = CUDA. rand (T, V2 ⊗ V1 ⊗ V3)
567- CUDA. @allowscalar begin
568- t = @constinferred (t1 ⊗ t2)
569- @tensor t′[1 , 2 , 3 , 4 , 5 , 6 ] := t1[1 , 2 , 3 ] * t2[4 , 5 , 6 ]
570- # @test t ≈ t′ # TODO broken for symmetry: Irrep[ℤ₃]
571- end
563+ t = @constinferred (t1 ⊗ t2)
564+ @tensor t′[1 , 2 , 3 , 4 , 5 , 6 ] := t1[1 , 2 , 3 ] * t2[4 , 5 , 6 ]
565+ # @test t ≈ t′ # TODO broken for symmetry: Irrep[ℤ₃]
572566 end
573567 end
574568 end
0 commit comments