summaryrefslogtreecommitdiff
path: root/1529/CH9/EX9.21/9_21.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1529/CH9/EX9.21/9_21.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '1529/CH9/EX9.21/9_21.sce')
-rwxr-xr-x1529/CH9/EX9.21/9_21.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/1529/CH9/EX9.21/9_21.sce b/1529/CH9/EX9.21/9_21.sce
new file mode 100755
index 000000000..9d0574776
--- /dev/null
+++ b/1529/CH9/EX9.21/9_21.sce
@@ -0,0 +1,13 @@
+//Chapter 9, Problem 21, Figure 9.11
+clc;
+dI=6-1;
+dt=200*10^-3;
+E=15;
+Np=1000;
+Ns=480;
+M=E/(dI/dt);
+S=(Np*Ns)/M;
+Lp=Np^2/S;
+printf("Mutual Inductance = %f H\n\n\n",M);
+printf("Reluctance = %d A/Wb\n\n\n",S);
+printf("Primary self-inductance Lp = %f H",Lp);