@@ -4,22 +4,7 @@ using DataFrames
44using LinearAlgebra
55
66# Create wing geometry
7- wing = KiteWing (" data/HL5_ram_air_kite_body.obj" )
8-
9- alphas = deg2rad .(- 10 : 1 : 25 ) # Range of angles from -10 to 25 degrees
10- polars = zeros (length (alphas), 4 ) # Matrix for [alpha, CD, CL, CM]
11- for (i, alpha) in enumerate (alphas)
12- # Simplified aerodynamic coefficients
13- cd = 0.015 + 0.015 * abs (alpha/ 10 )^ 1.5 # Drag increases with angle
14- cl = 5.0 * alpha + 0.01 * alpha^ 2 * exp (- alpha/ 20 ) # Lift with stall behavior
15- cm = - 0.02 * alpha # Linear pitching moment
16-
17- polars[i, :] .= [alpha, cd, cl, cm]
18- end
19-
20- for gamma in range (wing. gamma_tip - wing. gamma_tip/ 10 , - wing. gamma_tip + wing. gamma_tip/ 10 , 20 )
21- add_section! (wing, gamma, (" polar_data" , polars))
22- end
7+ wing = KiteWing (" data/ram_air_kite_body.obj" , " data/ram_air_kite_foil.dat" )
238wing_aero = WingAerodynamics ([wing])
249
2510# Create solvers
@@ -59,34 +44,32 @@ plot_geometry(
5944
6045# Solving and plotting distributions
6146@time results = solve (VSM, wing_aero)
62- @time results_with_stall = solve (VSM_with_stall_correction , wing_aero)
47+ @time results = solve (VSM , wing_aero)
6348
6449CAD_y_coordinates = [panel. aerodynamic_center[2 ] for panel in wing_aero. panels]
6550
6651plot_distribution (
67- [CAD_y_coordinates, CAD_y_coordinates ],
68- [results, results_with_stall ],
69- [" VSM" , " VSM with stall correction " ];
52+ [CAD_y_coordinates],
53+ [results],
54+ [" VSM" ];
7055 title= " CAD_spanwise_distributions_alpha_$(round (aoa, digits= 1 )) _beta_$(round (side_slip, digits= 1 )) _yaw_$(round (yaw_rate, digits= 1 )) _v_a_$(round (v_a, digits= 1 )) " ,
7156 data_type= " .pdf" ,
7257 is_save= false ,
7358 is_show= true
7459)
7560
7661plot_polars (
77- [VSM, VSM_with_stall_correction ],
78- [wing_aero, wing_aero ],
62+ [VSM],
63+ [wing_aero],
7964 [
80- " VSM CAD 19ribs" ,
81- " VSM CAD 19ribs , with stall correction" ,
65+ " VSM from Ram Air Kite OBJ and DAT file" ,
8266 ];
83- angle_range= range (0 , 25 , length= 25 ),
67+ angle_range= range (0 , 20 , length= 20 ),
8468 angle_type= " angle_of_attack" ,
8569 angle_of_attack= 0 ,
8670 side_slip= 0 ,
87- yaw_rate= 0 ,
8871 v_a= 10 ,
89- title= " tutorial_testing_stall_model_n_panels_ $(wing. n_panels) _distribution_$(wing. spanwise_panel_distribution) " ,
72+ title= " ram_kite_panels_ $(wing. n_panels) _distribution_$(wing. spanwise_panel_distribution) " ,
9073 data_type= " .pdf" ,
9174 is_save= false ,
9275 is_show= true
0 commit comments