summaryrefslogtreecommitdiff
path: root/1055/CH14/EX14.5/ch14_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '1055/CH14/EX14.5/ch14_5.sce')
-rwxr-xr-x1055/CH14/EX14.5/ch14_5.sce9
1 files changed, 9 insertions, 0 deletions
diff --git a/1055/CH14/EX14.5/ch14_5.sce b/1055/CH14/EX14.5/ch14_5.sce
new file mode 100755
index 000000000..911341a9f
--- /dev/null
+++ b/1055/CH14/EX14.5/ch14_5.sce
@@ -0,0 +1,9 @@
+// To determine (i) % winding which remains unprotected (ii)min. value of earthing resistance required to protect 80% of winding
+clear
+clc;
+Iph=10000/sqrt(3);// phase voltage of alternator(V)
+x=1.8*100*10*1000/(5*Iph);
+mprintf("(i) percent winding which remains unprotected=%.2f \n",x);
+Ip=Iph*.2;
+R=1.8*1000/(5*Ip);
+mprintf("(ii)minimum value of earthing resistance required to protect 80 percent of winding =%.4f ohms \n",R)