% You should run LatSC.m before running this script.
format compact
disp(' '); disp('<<<<<<<Start here<<<<<')
A
eig(A)
% Roll mode approximation without bank angle (phi)
% function [a,b,c,d]=selector(A,B,C,D,xselect,uselect,yselect)
xselect=[2]
uselect=[1]
yselect=[2]

[as,bs,cs,ds]=selector(A,B,C,D,xselect,uselect,yselect)
eig(as)

% function [a,b,c,d]=selector(A,B,C,D,xselect,uselect,yselect)
xselect=[2 4]
uselect=[1]
yselect=[2 4]

[as2,bs2,cs2,ds2]=selector(A,B,C,D,xselect,uselect,yselect)
eig(as2)

% Dutch roll approximation
% function [a,b,c,d]=selector(A,B,C,D,xselect,uselect,yselect)
xselect=[1 3]
uselect=[2]
yselect=[1 3]

[as3,bs3,cs3,ds3]=selector(A,B,C,D,xselect,uselect,yselect)
eig(as3)
A
B
eig(A)