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

---
 2642/CH3/EX3.13/Ex3_13.sce | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100755 2642/CH3/EX3.13/Ex3_13.sce

(limited to '2642/CH3/EX3.13')

diff --git a/2642/CH3/EX3.13/Ex3_13.sce b/2642/CH3/EX3.13/Ex3_13.sce
new file mode 100755
index 000000000..3ce3efd85
--- /dev/null
+++ b/2642/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,29 @@
+// FUNDAMENTALS OF ELECTICAL MACHINES 
+// M.A.SALAM 
+// NAROSA PUBLISHING HOUSE 
+// SECOND EDITION
+
+// Chapter 3 : TRANSFORMER AND PER UNIT SYSTEM
+// Example : 3.13
+
+clc;clear; // clears the console and command history 
+
+// Given data
+kVA = 120               // kVA ratings of autotransformer
+V1 = 2200               // lower part voltage of autotransformer in V
+V2 = 220                // upper part voltage of autotransformer in V
+
+// caclulations 
+I_pq = kVA*10^3/V2     // currents of respective windings
+I_qr = kVA*10^3/V1     // currents of respective windings
+I_1 = I_pq+I_qr        // current in primary side in A
+V_2 = V1+V2            // voltage across the secondary side in V
+kVA_1 = I_1*V1/1000    // kVA ratings of autotrnsformer
+kVA_2 = I_pq*V_2/1000  // kVA ratings of autotrnsformer
+ 
+
+// display the result 
+disp("Example 3.13 solution");
+printf(" \n kVA ratings of autotrnsformer \n kVA_1 = %.0f kVA \n", kVA_1);
+printf(" \n kVA ratings of autotrnsformer \n kVA_2 = %.0f kVA \n", kVA_2);
+
-- 
cgit