summaryrefslogtreecommitdiff
path: root/671/CH4/EX4.40/4_40.sce
diff options
context:
space:
mode:
Diffstat (limited to '671/CH4/EX4.40/4_40.sce')
-rwxr-xr-x671/CH4/EX4.40/4_40.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/671/CH4/EX4.40/4_40.sce b/671/CH4/EX4.40/4_40.sce
new file mode 100755
index 000000000..3333f6e04
--- /dev/null
+++ b/671/CH4/EX4.40/4_40.sce
@@ -0,0 +1,19 @@
+V=240
+w=100*%pi
+R=6
+
+Vr=120
+I=Vr/R
+
+t=(205/I)^2 ////t=r^2+Xl^2
+r=((240/I)^2-t-R*R)/2/R ///this part solved wrong in the book
+Xl=sqrt(t-r*r)
+Z=sqrt(t)
+disp(r)
+disp(Xl)
+disp(Z)
+
+Pl_choke=I*I*r
+disp(Pl_choke)
+pf=Pl_choke/205/20
+disp(pf)