diff options
Diffstat (limited to '1319/CH13/EX13.9/ii_9.sce')
| -rw-r--r-- | 1319/CH13/EX13.9/ii_9.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/1319/CH13/EX13.9/ii_9.sce b/1319/CH13/EX13.9/ii_9.sce new file mode 100644 index 000000000..aa37a01dc --- /dev/null +++ b/1319/CH13/EX13.9/ii_9.sce @@ -0,0 +1,18 @@ +// Compute Inductance and EMF induced
+clc;
+clear;
+
+d=0.25;
+l=%pi*d;
+n=1000;
+area=6.25*(10^-4);
+I=200;
+mo=4*%pi*(10^-7);
+
+L=mo*area*n*n/l;
+
+V=L*I;
+
+disp('H',L,'The Inductance of toriod')
+disp('volts',V,'The Induced EMF in the toriod')
+
|