1 files changed, 17 insertions, 0 deletions
diff --git a/2384/CH9/EX9.15/ex9_15.sce b/2384/CH9/EX9.15/ex9_15.sce
new file mode 100755
index 000000000..aaea45d62
--- /dev/null
+++ b/2384/CH9/EX9.15/ex9_15.sce
@@ -0,0 +1,17 @@
+// Exa 9.15
+clc;
+clear;
+close;
+format('v',6)
+// Given data
+Rating = 8*10^3;// in VA
+phi= acosd(0.8);// in °
+V1 = 400;// in V
+V2 = 100;// in V
+f = 50;// in Hz
+Pi = 60;// in W
+Wo = Pi;// in W
+Pcu = 100;// in W
+// The full load efficiency 
+Eta_f1 = ((Rating*cosd(phi))/((Rating*cosd(phi)) + Pi + Pcu))*100;// in %
+disp(Eta_f1,"The full load efficiency in % is");