Clutch_Lhomme_P

function Clutch_Lhomme_P
%Parameter for:
%Lhomme, W. et al.: "Switched causal modeling of transmission with 
%                    clutch in hybrid electric vehicles"
%Vehicle Power and Propulsion Conference, 2006. VPPC '06, IEEE,
%2006, pp.1/6, ISBN: 1-4244-0159-3

assignin('base','T1',40);        %drive torque [Nm]
assignin('base','T4',25);        %load torque [Nm]
assignin('base','J1',0.2);       %inertia left side [kgm^2]
assignin('base','J2',0.6);       %inertia right side [kgm^2]
assignin('base','f1',0.001);      %friction coefficient left side of the shaft[Nms]
assignin('base','f2',0.002);      %friction coefficient right side of the shaft[Nms]
assignin('base','my_stat',0.28);    %static friction coefficient of the clutch [-]
assignin('base','R_clutch',0.1);    %average radius of the clutch friction plate [m]
assignin('base','alpha_dyn',0.001); %dynamic friction coefficient of the clutch [s/rad]
assignin('base','Fn_max',4000);     %maximum normal action force [N]

txt='"Clutch Lhomme"';
disp(['Parameter for Bond Graph example ' txt ' loaded!']);