1 files changed, 24 insertions, 0 deletions
diff --git a/503/CH3/EX3.16/ch3_16.sci b/503/CH3/EX3.16/ch3_16.sci
new file mode 100755
index 000000000..0018d2072
--- /dev/null
+++ b/503/CH3/EX3.16/ch3_16.sci
@@ -0,0 +1,24 @@
+// to calculate voltage ratings,kva ratings and efficieny of autotransformer
+
+clc;
+
+AB=200;
+BC=2000;
+V_1=BC;        disp(V_1,'V_1(V)');
+V_2=AB+BC;     disp(V_2,'V_2(V)');
+r=20000;            //rating of transformer
+I_2=r/AB;
+I_1=I_2+10;
+rr=V_2*I_2/1000;        //kva rating of autotransformer
+disp(rr,'kva rating');
+ri=V_1*(I_1-I_2)/1000;    //kva inductive
+rc=rr-ri;
+disp(ri,'kva transferred inductively');
+disp(rc,'kva transferred conductively');
+W_c=120;            //core loss
+W_cu=300;            //cu loss
+W_t=W_c+W_cu;        //total loss
+pf=0.8;
+W=V_2*I_2*pf;        //full load output
+n=1-(W_t/W);
+disp(n*100,'eff(%)');
+\ No newline at end of file