summaryrefslogtreecommitdiff
path: root/2384/CH9/EX9.12/ex9_12.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2384/CH9/EX9.12/ex9_12.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 '2384/CH9/EX9.12/ex9_12.sce')
-rwxr-xr-x2384/CH9/EX9.12/ex9_12.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/2384/CH9/EX9.12/ex9_12.sce b/2384/CH9/EX9.12/ex9_12.sce
new file mode 100755
index 000000000..76ca80a8d
--- /dev/null
+++ b/2384/CH9/EX9.12/ex9_12.sce
@@ -0,0 +1,25 @@
+// Exa 9.12
+clc;
+clear;
+close;
+format('v',6)
+// Given data
+Rating = 30*10^3;// in VA
+V1 = 2000;// in V
+V2 = 200;// in V
+f = 50;// in Hz
+R1 = 3.5;// in ohm
+X1 = 4.5;// in ohm
+R2 = 0.015;// in ohm
+X2 = 0.02;// in ohm
+K = V2/V1;
+R1e = R1 + (R2/(K^2));// in ohm
+disp(R1e,"The equivalent resistance to primary side in ohm is");
+X1e = X1 + (X2/(K^2));// in ohm
+disp(X1e,"The equivalent reactance to primary side in ohm is");
+Z1e = sqrt( (R1e^2) + (X1e^2) );// in ohm
+disp(Z1e,"The equivalent impedance to primary side in ohm is");
+I1 = Rating/V1;// in A
+// Total copper loss in transformer
+Pcu_total = (I1^2)*R1e;// in W
+disp(Pcu_total,"Total copper loss in W is");