L1 = 20;
L1A = 10;
L1B = 10;
L2 = 50;
H= 0.47;
lambda1p = 2;
lambda2p = 2;
lambda3p = 1/(lambda1p*lambda2p);
M = 17.5;
c = 0.696;
mu = 562.01;
epsilon = 2.39e-11;
roe = 1522;
A = 0.011;
T = 20;
f = 1/T;
syms t
x = @(t)((((heaviside(t-1)+heaviside(9-t))/2)+((heaviside(t-3)+heaviside(6-t))/2))-1)*A;
lambda1A = @(t)((L1A*lambda1p)+x(t))/L1A;
lambda1B = @(t)((2*lambda2p)-lambda1A(t));
lambda1Adot=symfun(diff(lambda1A(t)),t);
lambda1Adot_t=@(t) eval(lambda1Adot);
lambda1Bdot=symfun(diff(lambda1B(t)),t);
lambda1Bdot_t=@(t) eval(lambda1Bdot);
lambda1A2dot=symfun(diff(diff(lambda1Adot(t)),t),t);
lambda1A2dot_t=@(t) eval(lambda1A2dot);
lambda1B2dot=symfun(diff(diff(lambda1Bdot(t)),t),t);
lambda1B2dot_t=@(t) eval(lambda1B2dot);
t = [0.01:0.1:9.99];
x = x(t);
lambda1A = lambda1A(t);
lambda1B = lambda1B(t);
lambda1Adot_t=lambda1Adot_t(t);
lambda1Bdot_t=lambda1Bdot_t(t);
lambda1A2dot_t=lambda1A2dot_t(t);
lambda1B2dot_t=lambda1B2dot_t(t);
Phi = (((L1A*H)./(L2*epsilon*(lambda2p^2)*lambda1A)).*((M.*lambda1A2dot_t)+(c.*lambda1Adot_t)-(((mu*L2*H)./L1A).*((2*lambda1p)-(2*lambda1A)-((((2*lambda1p)-(lambda1A)).^-3)*(lambda2p^-2))+((lambda1A.^-3)*(lambda2p^-2)))))).^0.5;