summaryrefslogtreecommitdiff
path: root/608/CH43/EX43.01/43_01.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /608/CH43/EX43.01/43_01.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 '608/CH43/EX43.01/43_01.sce')
-rwxr-xr-x608/CH43/EX43.01/43_01.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/608/CH43/EX43.01/43_01.sce b/608/CH43/EX43.01/43_01.sce
new file mode 100755
index 000000000..f7d000731
--- /dev/null
+++ b/608/CH43/EX43.01/43_01.sce
@@ -0,0 +1,19 @@
+//Problem 43.01: A and B are two coils in close proximity. A has 1200 turns and B has 1000 turns. When a current of 0.8 A flows in coil A a flux of 100 μWb links with coil A and 75% of this flux links coil B. Determine (a) the self inductance of coil A, and (b) the mutual inductance.
+
+//initializing the variables:
+Na = 1200;
+Nb = 1000;
+Ia = 0.8; // in amperes
+Phia = 100E-6; // in Wb
+xb = 0.75;
+
+//calculation:
+//self inductance of coil A
+La = Na*Phia/Ia
+//mutual inductance, M
+Phib = xb*Phia
+M = Nb*Phib/Ia
+
+printf("\n\n Result \n\n")
+printf("\n self inductance of coil A is %.2f H",La)
+printf("\n mutual inductance, M is %.2E H",M) \ No newline at end of file