summaryrefslogtreecommitdiff
path: root/1067/CH20/EX20.22/20_22.sce
diff options
context:
space:
mode:
Diffstat (limited to '1067/CH20/EX20.22/20_22.sce')
-rwxr-xr-x1067/CH20/EX20.22/20_22.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/1067/CH20/EX20.22/20_22.sce b/1067/CH20/EX20.22/20_22.sce
new file mode 100755
index 000000000..71bb1a396
--- /dev/null
+++ b/1067/CH20/EX20.22/20_22.sce
@@ -0,0 +1,11 @@
+clc;
+clear;
+mvan=6800e6;
+v=132e3;
+mvac=200e6;
+mvae=mvan-mvac;
+n=mvan/(sqrt(3)*v);
+e=mvae/(1.681*v);
+e=fix(e/10)*10;
+n=fix(n/10)*10;
+printf("normal fault current=%f/_-90 kA\nEffective fault current=%f/_-90 kA",n/1e3,e/1e3);