summaryrefslogtreecommitdiff
path: root/671/CH4/EX4.47
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:38:01 +0530
committerprashantsinalkar2017-10-10 12:38:01 +0530
commitf35ea80659b6a49d1bb2ce1d7d002583f3f40947 (patch)
treeeb72842d800ac1233e9d890e020eac5fd41b0b1b /671/CH4/EX4.47
parent7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (diff)
downloadScilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.gz
Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.bz2
Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.zip
updated the code
Diffstat (limited to '671/CH4/EX4.47')
-rwxr-xr-x671/CH4/EX4.47/4_47.sce37
1 files changed, 20 insertions, 17 deletions
diff --git a/671/CH4/EX4.47/4_47.sce b/671/CH4/EX4.47/4_47.sce
index b765ddb30..61d56e636 100755
--- a/671/CH4/EX4.47/4_47.sce
+++ b/671/CH4/EX4.47/4_47.sce
@@ -1,18 +1,21 @@
-V=10*%i
-w=1000
-R=2
-L=2E-3
-C=500E-6
-Xl=w*L*%i
-Xc=1/(w*C*%i)
-
-Zeq=Xl+Xc+parallel(R,Xl)
-disp(Zeq)
-
-I=V/Z
-Ir=I*Xl/(R+Xl)
-Il2=I-Ir
-Vl=I*Xl
-Vc=I*Xc
-
+function a = parallel(b,c)
+a = b*c/(b+c)
+endfunction
+V=10*%i
+w=1000
+R=2
+L=2E-3
+C=500E-6
+Xl=w*L*%i
+Xc=1/(w*C*%i)
+
+Zeq=Xl+Xc+parallel(R,Xl)
+disp(Zeq)
+
+I=V/Zeq
+Ir=I*Xl/(R+Xl)
+Il2=I-Ir
+Vl=I*Xl
+Vc=I*Xc
+
disp(I,Ir,Il2,Vl,Vc) \ No newline at end of file