summaryrefslogtreecommitdiff
path: root/1544/CH5/EX5.24
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1544/CH5/EX5.24
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 '1544/CH5/EX5.24')
-rwxr-xr-x1544/CH5/EX5.24/Ch05Ex24.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/1544/CH5/EX5.24/Ch05Ex24.sce b/1544/CH5/EX5.24/Ch05Ex24.sce
new file mode 100755
index 000000000..c71498b3c
--- /dev/null
+++ b/1544/CH5/EX5.24/Ch05Ex24.sce
@@ -0,0 +1,17 @@
+// Scilab code Ex5.24: SPg 182 (2008)
+clc; clear;
+N_A = 2000; // Number of turns in a coil A
+N_B = 1500; // Number of turns in a coil B
+I_A = 0.5; // Electric current in coil A, A
+phi_A = 60e-06; // Flux linked with coil A, Wb
+// Part (a)
+L_A = (N_A*phi_A)/I_A; // Self-inductance of coil A
+phi_B = 0.83*(60e-06); // Flux linked with coil B, Wb
+// Part (b)
+M = (N_B*phi_B)/I_A; // Mutual inductance of the two coils, H
+printf("\nSelf-inductance of coil A = %4.2f H", L_A)
+printf("\nMutual inductance of the two coils = %5.3f H", M)
+
+// Result
+// Self-inductance of coil A = 0.24 H
+// Mutual inductance of the two coils = 0.149 H