summaryrefslogtreecommitdiff
path: root/2360/CH6/EX6.41/ex6_41.sce
diff options
context:
space:
mode:
Diffstat (limited to '2360/CH6/EX6.41/ex6_41.sce')
-rwxr-xr-x2360/CH6/EX6.41/ex6_41.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/2360/CH6/EX6.41/ex6_41.sce b/2360/CH6/EX6.41/ex6_41.sce
new file mode 100755
index 000000000..a2d894ac4
--- /dev/null
+++ b/2360/CH6/EX6.41/ex6_41.sce
@@ -0,0 +1,11 @@
+// Exa 6.41
+format('v',7);clc;clear;close;
+// Given data
+L1 = 52.6;//inductance in mH
+R2 = 1.68;//resistance in ohm
+// 80*(r1+(J*omega*L1)) = 80*( (R2+r2) + (J*omega*L2) );
+L2 = L1;//inductance of the coil in mH
+disp(L2,"The inductance of the coil in mH is");
+r1 = 28.5;// in ohm
+r2 = r1-R2;//resistance of the coil in ohm
+disp(r2,"The resistance of the coil in ohm is");