@@ -51,20 +51,20 @@ function te_arc_length_between_ribs(wing, rib_left, rib_right)
5151 if isnothing (first_idx)
5252 if isapprox (sec. LE_point,
5353 wing. unrefined_sections[rib_left]. LE_point;
54- atol= 1e-10 )
54+ atol= 1e-8 )
5555 first_idx = i
5656 end
5757 end
5858 if ! isnothing (first_idx) && isnothing (last_idx)
5959 if isapprox (sec. LE_point,
6060 wing. unrefined_sections[rib_right]. LE_point;
61- atol= 1e-10 )
61+ atol= 1e-8 )
6262 last_idx = i
6363 break
6464 end
6565 end
6666 end
67- @assert ! isnothing (first_idx) && ! isnothing (last_idx)
67+ @test ! isnothing (first_idx) && ! isnothing (last_idx)
6868 arc = 0.0
6969 for i in first_idx: (last_idx - 1 )
7070 arc += norm (sections[i + 1 ]. TE_point -
8484 billowing_percentage= 0.0 )
8585 for pair in 1 : (n_ribs - 1 )
8686 res = te_arc_length_between_ribs (wing, pair, pair + 1 )
87- @test res. arc ≈ res. straight atol= 1e-10
87+ @test res. arc ≈ res. straight atol= 1e-8
8888 end
8989 end
9090
9797 for sec in wing. refined_sections
9898 if isapprox (sec. LE_point,
9999 wing. unrefined_sections[i]. LE_point;
100- atol= 1e-10 )
100+ atol= 1e-8 )
101101 @test isapprox (sec. TE_point,
102102 wing. unrefined_sections[i]. TE_point;
103103 atol= 1e-6 )
139139 for sec in wing. refined_sections
140140 chord = norm (sec. TE_point - sec. LE_point)
141141 # All ribs have chord=1.0, so interpolated chord=1.0
142- @test isapprox (chord, 1.0 ; atol= 1e-10 )
142+ @test isapprox (chord, 1.0 ; atol= 1e-8 )
143143 end
144144 end
145145
@@ -209,20 +209,20 @@ end
209209
210210 # Zero angle is identity
211211 r = rodrigues_rotate (v, axis, 0.0 )
212- @test isapprox (r, v; atol= 1e-14 )
212+ @test isapprox (r, v; atol= 1e-12 )
213213
214214 # 90 degrees around z rotates x -> y
215215 r90 = rodrigues_rotate (v, axis, pi / 2 )
216- @test isapprox (r90, MVec3 (0.0 , 1.0 , 0.0 ); atol= 1e-14 )
216+ @test isapprox (r90, MVec3 (0.0 , 1.0 , 0.0 ); atol= 1e-12 )
217217
218218 # 180 degrees around z rotates x -> -x
219219 r180 = rodrigues_rotate (v, axis, pi )
220- @test isapprox (r180, MVec3 (- 1.0 , 0.0 , 0.0 ); atol= 1e-14 )
220+ @test isapprox (r180, MVec3 (- 1.0 , 0.0 , 0.0 ); atol= 1e-12 )
221221
222222 # Rotation preserves vector length
223223 v2 = MVec3 (3.0 , 4.0 , 0.0 )
224224 r2 = rodrigues_rotate (v2, axis, 1.23 )
225- @test isapprox (norm (r2), norm (v2); atol= 1e-14 )
225+ @test isapprox (norm (r2), norm (v2); atol= 1e-12 )
226226 end
227227
228228 @testset " Fast path: n_panels == n_provided warns" begin
246246 # All refined sections should match unrefined exactly
247247 for (ref, unref) in zip (
248248 wing. refined_sections, wing. unrefined_sections)
249- @test isapprox (ref. LE_point, unref. LE_point; atol= 1e-10 )
250- @test isapprox (ref. TE_point, unref. TE_point; atol= 1e-10 )
249+ @test isapprox (ref. LE_point, unref. LE_point; atol= 1e-8 )
250+ @test isapprox (ref. TE_point, unref. TE_point; atol= 1e-8 )
251251 end
252252 end
253253end
0 commit comments