|
104 | 104 | end
|
105 | 105 |
|
106 | 106 | @testset "$(AD)" for AD in [:ReverseDiff]
|
107 |
| - @test_broken ga = gradient(AD, A) do a |
108 |
| - testfunction(ta_row, a, 2) |
| 107 | + @test_broken let |
| 108 | + gx = gradient(AD, X) do x |
| 109 | + testfunction(tx_row, x, 2) |
| 110 | + end |
| 111 | + ga = gradient(AD, A) do a |
| 112 | + testfunction(ta_row, a, 2) |
| 113 | + end |
| 114 | + gx ≈ ga |
109 | 115 | end
|
110 |
| - @test_broken ga = gradient(AD, A) do a |
111 |
| - testfunction(ta_col, a, 1) |
| 116 | + @test_broken let |
| 117 | + gx = gradient(AD, X) do x |
| 118 | + testfunction(tx_col, x, 1) |
| 119 | + end |
| 120 | + ga = gradient(AD, A) do a |
| 121 | + testfunction(ta_col, a, 1) |
| 122 | + end |
| 123 | + gx ≈ ga |
112 | 124 | end
|
113 |
| - @test_broken ga = gradient(AD, A) do a |
114 |
| - testfunction(ta_row, a, B, 2) |
| 125 | + @test_broken let |
| 126 | + gx = gradient(AD, X) do x |
| 127 | + testfunction(tx_row, x, Y, 2) |
| 128 | + end |
| 129 | + ga = gradient(AD, A) do a |
| 130 | + testfunction(ta_row, a, B, 2) |
| 131 | + end |
| 132 | + gx ≈ ga |
115 | 133 | end
|
116 |
| - @test_broken ga = gradient(AD, A) do a |
117 |
| - testfunction(ta_col, a, C, 1) |
| 134 | + @test_broken let |
| 135 | + gx = gradient(AD, X) do x |
| 136 | + testfunction(tx_col, x, Z, 1) |
| 137 | + end |
| 138 | + ga = gradient(AD, A) do a |
| 139 | + testfunction(ta_col, a, C, 1) |
| 140 | + end |
| 141 | + gx ≈ ga |
118 | 142 | end
|
119 | 143 | end
|
120 | 144 |
|
|
0 commit comments