function Fy=Fy_Pacejka(x,B,C,D,E)

%Fy_Pacjeka
%
%  Fy = Fy_Pacjeka(x,B,C,D,E) reutrns the value of the magic
%  formula tire model given by:
%
%        Fy =  -D*sin(C*atan(B*((1-E)*x+(E/B)*atan(B*x))));
%
Fy =  -D*sin(C*atan(B*((1-E)*x+(E/B)*atan(B*x))));