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

---
 1076/CH16/EX16.7/16_7.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100755 1076/CH16/EX16.7/16_7.sce

(limited to '1076/CH16/EX16.7/16_7.sce')

diff --git a/1076/CH16/EX16.7/16_7.sce b/1076/CH16/EX16.7/16_7.sce
new file mode 100755
index 000000000..ea9a2cf29
--- /dev/null
+++ b/1076/CH16/EX16.7/16_7.sce
@@ -0,0 +1,30 @@
+clear
+clc
+
+V=240
+
+P1=50e3
+P2=50e3
+P3=200e3
+Pm=500e3
+pfm=.8
+
+
+I1=P1/V
+I2=P2/V
+I3=P3/V
+Im=Pm/(3*V*pfm)
+
+i1=fix(I1*exp(%i *0*%pi/3)*100)/100
+i2=fix((fix(I2*100)/100)*exp(%i *-2*%pi/3)*1000)/1000
+i3=fix(I3*exp(%i *2*%pi/3)*100)/100
+in=abs(round((i1+i2+i3)*100)/100)
+
+iR=sqrt((I1)^2+(Im)^2+(2*I1*Im*pfm))
+iY=sqrt((I2)^2+(Im)^2+(2*I2*Im*pfm))
+iB=sqrt((I3)^2+(Im)^2+(2*I3*Im*pfm))
+
+mprintf("\nIR= %.0f A", iR)
+mprintf("\nIY= %.0f A", iY)
+mprintf("\nIB= %.0f A", iB)
+mprintf("\nIn= %.2f A", in)
-- 
cgit