From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 671/CH8/EX8.5/8_5.sce | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100755 671/CH8/EX8.5/8_5.sce (limited to '671/CH8/EX8.5') diff --git a/671/CH8/EX8.5/8_5.sce b/671/CH8/EX8.5/8_5.sce new file mode 100755 index 000000000..7df0ae10f --- /dev/null +++ b/671/CH8/EX8.5/8_5.sce @@ -0,0 +1,18 @@ +function [x,y]=polar_to_cart(r,theta) + theta=theta/180*%pi + x=r*cos(theta) + y=r*sin(theta) +endfunction + +[Zr,Zc]=polar_to_cart(5,30) +Z2=complex(Zr,Zc) + +V=200 +N2=75 +N1=100 + +I2=V/Z2 +I1=N2/N1*I2 + +disp(norm(I1)) +disp(" lagging" , real(I1)/norm(I1)) -- cgit