Xcos examples from textbooks and for blocksHEADmaster

1 files changed, 23 insertions, 0 deletions

diff --git a/Working_Examples/83/CH11/EX11.2/example_11_2.sce b/Working_Examples/83/CH11/EX11.2/example_11_2.sce
new file mode 100755
index 0000000..e45c76c
--- /dev/null
+++ b/Working_Examples/83/CH11/EX11.2/example_11_2.sce
@@ -0,0 +1,23 @@
+//Chapter 11
+//Example 11.2
+//page 408
+//To find fault current and voltage across the grounding resistor
+clear;clc;
+
+X1eq=(%i*0.18)/2;
+X2eq=(%i*0.15)/2;
+Z0eq=(%i*0.10)+3*(2*20/(11^2));
+
+Ea=1;
+
+//calculation of fault current
+printf('\nFault current is given by ');
+If=(3*Ea)/(X1eq+X2eq+Z0eq)
+
+//current in grounding resistor
+Ifg=abs(If)*(20/(11*sqrt(3)));
+printf('\n\nCurrent through grounding resistor Ifg=%0.2fkA',Ifg);
+
+//voltage across grounding resistor
+Vgr=abs(If*(2*20/(11^2))*(11/sqrt(3)));
+printf('\n\nVoltage across grounding resistor Vgr=%0.2fkV\n\n',Vgr);
\ No newline at end of file