diff options
| author | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:27:19 +0530 |
| commit | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch) | |
| tree | dbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3574/CH12/EX12.5/EX12_5.sce | |
| parent | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff) | |
| download | Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2 Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip | |
initial commit / add all books
Diffstat (limited to '3574/CH12/EX12.5/EX12_5.sce')
| -rw-r--r-- | 3574/CH12/EX12.5/EX12_5.sce | 39 |
1 files changed, 39 insertions, 0 deletions
diff --git a/3574/CH12/EX12.5/EX12_5.sce b/3574/CH12/EX12.5/EX12_5.sce new file mode 100644 index 000000000..e4bad02c8 --- /dev/null +++ b/3574/CH12/EX12.5/EX12_5.sce @@ -0,0 +1,39 @@ +// Example 12.5
+// Computation of (a) New bus voltage (b) Current supplied by each generator
+//Page No. 500
+
+clc;
+clear;
+close;
+
+// Given data
+p1=300000; // Rated power in generator A
+p2=400000; // Rated power in generator B
+v=250; // Rated voltage in machine
+p3=350000; // Rated power in generator C
+Ibnew=2500;
+
+// (a) New bus voltage
+
+IArated=p1/v; // Rated current in generator A
+IBrated=p2/v; // Rated current in generator B
+IBorig=p3/v; // Original bus current
+IbDelta=Ibnew-IBorig; // Current difference
+DelVbus=IbDelta/(160+128); // Voltage difference
+
+
+// (b) Current supplied by each generator
+DelIA=160*DelVbus; // Generator A current difference
+DelIB=128*DelVbus; // Generator A current difference
+Vbus=v-DelVbus; // Voltage across the bus
+IA=700+DelIA; // Current in generator A
+IB=700+DelIB; // Current in generator B
+
+Loading= (IA-IArated)*100/IArated;
+
+
+// Display result on command window
+printf("\n New bus voltage = %0.2f V ",DelVbus);
+printf("\n Current supplied by generator A = %0.0f A ",IA);
+printf("\n Current supplied by generator B = %0.0f A ",IB);
+printf("\n Macine A is overloaded by %0.1f Percent ",Loading);
|