summaryrefslogtreecommitdiff
path: root/1076/CH13/EX13.18/13_18.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1076/CH13/EX13.18/13_18.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1076/CH13/EX13.18/13_18.sce')
-rwxr-xr-x1076/CH13/EX13.18/13_18.sce30
1 files changed, 30 insertions, 0 deletions
diff --git a/1076/CH13/EX13.18/13_18.sce b/1076/CH13/EX13.18/13_18.sce
new file mode 100755
index 000000000..2320cb4cc
--- /dev/null
+++ b/1076/CH13/EX13.18/13_18.sce
@@ -0,0 +1,30 @@
+clear
+clc
+
+f=50
+w=2*%pi*f
+I1=25000
+pf1=.8
+J1=.5*I1*w*w*1e-6
+P1=45
+G1=P1/pf1
+H1=J1/G1
+M1=J1/(180*f)
+
+mprintf("machine 1 \nInertia const= %.2f MJ/MVA, Momentum= %.3f MJ-s/elec deg",H1,M1)
+
+I2=9000
+pf2=.75
+J2=.5*I2*w*w*1e-6
+P2=60
+G2=P2/pf2
+H2=J2/G2
+M2=J2/(180*f)
+
+mprintf("\n\nmachine 2 \nInertia const= %.2f MJ/MVA, Momentum= %.5f MJ-s/elec deg",H2,M2)
+
+M=(M1*M2)/(M1+M2)
+Gb=100
+H=M*180 * f /Gb
+mprintf("\n\n Equivalent constant at 100MVA base \nInertia const= %.4f MJ/MVA, Momentum= %.5f MJ-s/elec deg",H,fix(M*100000)/100000)
+