|
9 | 9 | @testset "Solver Constructor with VSMSettings" begin |
10 | 10 | # Use module-specific test data files |
11 | 11 | settings_file = create_temp_wing_settings("solver", "solver_test_wing.yaml"; alpha=5.0, beta=0.0, wind_speed=10.0) |
12 | | - |
| 12 | + |
13 | 13 | try |
14 | 14 | # Test Solver constructor with VSMSettings |
15 | 15 | settings = VSMSettings(settings_file) |
16 | 16 | wing = Wing(settings) |
17 | 17 | refine!(wing) |
18 | 18 | body_aero = BodyAerodynamics([wing]) |
19 | 19 | solver = Solver(body_aero, settings) |
20 | | - |
| 20 | + |
21 | 21 | # Verify solver properties match settings |
22 | 22 | @test solver.aerodynamic_model_type == VSM |
23 | 23 | @test solver.density == 1.225 |
24 | | - |
25 | | - # Test that the solver can solve |
| 24 | + |
| 25 | + # Test that the solver can solve |
26 | 26 | va = [10.0, 0.0, 0.0] |
27 | 27 | set_va!(body_aero, va) |
28 | 28 | sol = solve!(solver, body_aero) |
29 | 29 | @test sol isa VSMSolution |
30 | | - |
| 30 | + |
31 | 31 | finally |
32 | 32 | # Cleanup |
33 | 33 | rm(settings_file; force=true) |
34 | 34 | end |
35 | 35 | end |
36 | 36 | end |
| 37 | + |
| 38 | +@testset "NONLIN solve! re-runs across calls" begin |
| 39 | + settings_file = create_temp_wing_settings( |
| 40 | + "solver", "solver_test_wing.yaml"; |
| 41 | + alpha=5.0, beta=0.0, wind_speed=10.0, |
| 42 | + ) |
| 43 | + try |
| 44 | + settings = VSMSettings(settings_file) |
| 45 | + wing = Wing(settings) |
| 46 | + refine!(wing) |
| 47 | + |
| 48 | + body_aero = BodyAerodynamics([wing]) |
| 49 | + solver = Solver( |
| 50 | + body_aero; |
| 51 | + solver_type=NONLIN, |
| 52 | + aerodynamic_model_type=VSM, |
| 53 | + type_initial_gamma_distribution=ELLIPTIC, |
| 54 | + ) |
| 55 | + |
| 56 | + set_va!(body_aero, [10.0, 0.0, 0.0]) |
| 57 | + solve!(solver, body_aero) |
| 58 | + gamma_low = copy(solver.sol.gamma_distribution) |
| 59 | + |
| 60 | + set_va!(body_aero, [10.0, 0.0, 5.0]) |
| 61 | + solve!(solver, body_aero) |
| 62 | + gamma_high = copy(solver.sol.gamma_distribution) |
| 63 | + |
| 64 | + @test !isapprox(gamma_low, gamma_high; atol=1e-6, rtol=1e-4) |
| 65 | + @test norm(gamma_high .- gamma_low) > |
| 66 | + 1e-3 * max(norm(gamma_low), norm(gamma_high)) |
| 67 | + finally |
| 68 | + rm(settings_file; force=true) |
| 69 | + end |
| 70 | +end |
0 commit comments