function [v_a,interp_power] = load_aircraft_eff()
%load_aircraft_eff Flugzeugeffizienzkurve laden

measured_airspeed=[7 8 9 10 11 12 14 16 18 20 22 24 26 28 30]*3.6;   %in km/h
measured_power=[36.28589708 34.42375852 35.50096102 33.3665519 36.21718883 32.94772362 47.17750566 61.33935748 81.75780878 100.4778223 122.7823714 148.3755128 189.4795868 223.162757 255.8001442];  %in Watt

N_v=300;            %Anzahl der untersuchten Geschwindigkeitspunkte
v_a_max=150;        %Maximaler airspeed in km/h
v_a = linspace(1,v_a_max,N_v);  %Geschwindigkeitsvektor
interp_power = interp1(measured_airspeed, measured_power, v_a,'spline'); 

end