% BeschleunigungMoped_dat.m     Script-Datei zur Simulation des
%                               Bremsvorgangs eines Motorrads
%                               Patrick Goebel, 2016
clear all                       % alle Variablen loeschen

% Modellparameter
m=350;                          % kg Fahrzeugmasse
Fa=0;                           % N Antriebskraft
cw=0.6;                         % Ns^2/m^4 Luftwiderstandsbeiwert
A=0.8;                          % m^2 Querschnittsfläche des Fahrzeugs
Fr=100;                         % N Rollreibung
Fw=cw*A;                        % N Luftwiderstand


% Simulationsparameter definieren
simulation_opt=simset('Solver','ode5','FixedStep',1e-4);
Tsim=60;                        % Simulationszeit
% Simulation starten
[x,y,t]=sim('BremsungMoped_mod',Tsim,simulation_opt);

% Simulationsergebnisse darstellen
figure(1);                      % Grafik aufrufen
plot(ts,vs,'k'); grid;          % Zeitverlauf des Bremsvorgangs, Gitterlinien
xlabel('Zeit t in s');ylabel('Geschwindigkeit v in m/s');
title('Simulation der Bremszeit'); 
%Achsbezeichnungen, Titel
figure(2);                      % Grafik aufrufen
plot(xs,vs,'k'); grid;          % Verlauf des Bremswegs, Gitterlinien
xlabel('Strecke s in m');ylabel('Geschwindigkeit v in m/s');
title('Simulation des Bremsweges'); 
%Achsbezeichnungen, Titel