summaryrefslogtreecommitdiff
path: root/416/CH10/EX10.17/exp10_17pp.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /416/CH10/EX10.17/exp10_17pp.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 '416/CH10/EX10.17/exp10_17pp.sce')
-rwxr-xr-x416/CH10/EX10.17/exp10_17pp.sce28
1 files changed, 28 insertions, 0 deletions
diff --git a/416/CH10/EX10.17/exp10_17pp.sce b/416/CH10/EX10.17/exp10_17pp.sce
new file mode 100755
index 000000000..b594f1c25
--- /dev/null
+++ b/416/CH10/EX10.17/exp10_17pp.sce
@@ -0,0 +1,28 @@
+clc
+clear
+disp("example 10.17")
+//given
+a1=450;b1=6.5;c1=0.0013
+a2=300;b2=7.8;c2=0.0019
+a3=80;b3=8.1;c3=0.005
+tl=800//total load
+ma(1)=600
+mi(1)=100
+ma(2)=400
+mi(2)=50
+ma(3)=200
+mi(3)=50
+d=[1 1 1;2*c1 -2*c2 0;0 -2*c2 2*c3]
+p=[tl;(b2-b1);(b2-b3)]
+pp=inv(d)*p //matrix inversion method
+printf("\nloads on generaating station by economic creatirian method isp1=%fMW,p2=%fMW,p3=%fMW",pp(1),pp(2),pp(3))
+for i=1:3
+ if pp(i)<mi(i) then
+ pp(i)=mi(i)
+ end
+ if pp(i)>ma(i) then
+ pp(i)=ma(i)
+ end
+end
+pp(2)=tl-pp(1)-pp(3)
+printf("\nloads on generating station under critical conditions p1=%dMW p2=%dMW p3=%dMW",pp(1),pp(2),pp(3)) \ No newline at end of file