summaryrefslogtreecommitdiff
path: root/1418/CH26/EX26.28/EX26_28.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1418/CH26/EX26.28/EX26_28.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1418/CH26/EX26.28/EX26_28.sce')
-rw-r--r--1418/CH26/EX26.28/EX26_28.sce29
1 files changed, 29 insertions, 0 deletions
diff --git a/1418/CH26/EX26.28/EX26_28.sce b/1418/CH26/EX26.28/EX26_28.sce
new file mode 100644
index 000000000..117cd3ed3
--- /dev/null
+++ b/1418/CH26/EX26.28/EX26_28.sce
@@ -0,0 +1,29 @@
+//EXAMPLE 26.28
+//LONG SHUNT COMPOUND WOUND GENERATOR
+
+clc;
+funcprot(0);
+
+//Variable Initialisation
+V=240;.............//Voltage at full load in Volts
+I=100;.............//Load current in Amperes
+Ra=0.1;.............//Armature resistance in Ohms
+Rse=0.02;...........//Series field resistance in Ohms
+Ri=0.025;..........//Interpole field resistance in Ohms
+Rsh=100;...........//Shunt field resistance in Ohms
+Li=1000;............//Iron loss at full load in Watts
+Lwf=500;.............//Windage and friction losses in Watts
+
+Po=V*I;...............//Output power in Watts
+Rat=Ra+Rse+Ri;......//Total armature circuit resistance in Ohms
+Ish=V/Rsh;.........//Shunt field current in Amperes
+Ia=I+Ish;............//Armature current in Amperes
+Lacu=(Ia^2)*Rat;.....//Armature circuit copper loss in Watts
+Lshcu=V*Ish;.........//Shunt field copper loss in Watts
+Lt=Lacu+Li+Lwf+Lshcu;...//Total loss in Watts
+y=ceil(Lt);.............//Rounding of decimal places
+disp(y,"Total loss in Watts:");
+eff=(Po)*100/((Po)+y);..........//Efficiency in Percentage
+y1=round(eff*10)/10;..............//Rounding of decimal places
+disp(y1,"Efficiency in Percentage:");
+