1 files changed, 19 insertions, 0 deletions
diff --git a/1067/CH22/EX22.03/22_03.sce b/1067/CH22/EX22.03/22_03.sce
new file mode 100755
index 000000000..ac3f3e9a1
--- /dev/null
+++ b/1067/CH22/EX22.03/22_03.sce
@@ -0,0 +1,19 @@
+clear;
+clc;
+v=11e3;
+r=25e6;
+e=1;
+xg0=.05*%i;
+x1=.15*%i;
+x2=.15*%i;
+zbase=v^2/r;
+res=.3;
+xd=res/zbase;
+x0=xg0+(3*xd*%i);
+x=x1+x2+x0;
+ia0=e/x;
+ia=3*ia0;
+iabase=r/(1.7398*v);
+ia=ia*iabase;
+ia=fix(ia);
+printf("the line current for a line to ground fault=%dA",-imag(ia));