% Quick trim the Cessna 182 using elliptical Earth model.
disp(' ')
disp('Start here')
Vt=220.1% ft/sec
Hp=5000
constant=Cessna182;
[xIC,uIC,CL,CD,CM,alphadeg]=E_QuickTrim(Vt,Hp,constant)
flag=1;
t=0;
[sys,x0,str,ts] = E_aircraft(t,xIC,uIC,flag,constant,xIC)
