% ECE 111 Lecture #4
% Computer the power curve for a SWT32 wind turbine

function [ kW ] = SWT23( WIND )

kW = 0*WIND;
a3 =  -4.3371e+000;
a2 =   1.2822e+002;
a1 =  -8.6693e+002;
a0 =   1.8070e+003;
  

for i=1:length(WIND)
    if(WIND(i) < 4) kW(i) = 0;
    elseif(WIND(i) < 16)
        kW(i) = a3*WIND(i)^3 + a2*WIND(i)^2 + a1*WIND(i) + a0;
    else
        kW(i) = 3000;
    end
end

end