function [acc_road_resistance]=acceleration_road_resistance_response(curr_speed,tire_pressure,max_ang,percent,g)
%ACCELERATION_DRAG RESPONSE Função que calcula a aceleração provocada pela
%                           resistência do ar.
% A função calcula a aceleração provocada pela resistência do ar no carro.
%
% INPUTS:
% crr -> Rolling resistance coefficient [kg/s];
% velocity -> Velocidade do carro [km/h].
%
% OUTPUTS:
% acc_road_resistance -> Aceleração provocada pelo atrito da estrada [m/s²].

% Cálculo do crr:
crr=0.005+1/(tire_pressure)*(0.01+0.0095*(curr_speed/100)^2);
% Cálculo da força de resistencia nos pneus:
acc_road_resistance=crr*g*cos((2*max_ang)*percent-max_ang);
end