Foerderband_Skalar_P

function Foerderband_Skalar_P
%Parameter fr Frderband nach DI Drner

assignin('base','m_vor',136000);   %Masse fr ein Kelvin-Vogt-Element vorwrts [kg]
assignin('base','m_rueck',105400); %Masse fr ein Kelvin-Vogt-Element rckwrts [kg]
assignin('base','Fkv',940400);     %Federkonstante fr ein Kelvin-Vogt-Element [N/m]
assignin('base','Rkv',19400);      %Reibwert fr ein Kelvin-Vogt-Element [Ns/m]
assignin('base','Rroll',1046);     %Rollreibung [Ns/m]

disp('Parameter fr Bondgraph Beispiel "Frderband_Skalar" geladen!');