Circuit Theory/Phasors/Examples/Example 9/m-filec

syms t;
Vm = 120*2^.5
w = 377;
p = 2*pi/3;
L = .01;
R = 10;
IL = Vm *cos(w*t + p - pi/2)/(w*L);
vpa(IL,3)
Is = Vm * (1/R^2 + 1/(L*w)^2)^.5*cos(w*t + p - atan(R/(L*w)));
vpa(Is,3)
t = 0;
IL = Vm *cos(w*t + p - pi/2)/(w*L);
vpa(IL,3)
Is = Vm * (1/R^2 + 1/(L*w)^2)^.5*cos(w*t + p - atan(R/(L*w)));
vpa(Is,3)