From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 887/CH15/EX15.3/15_3.sce | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100755 887/CH15/EX15.3/15_3.sce

(limited to '887/CH15/EX15.3')

diff --git a/887/CH15/EX15.3/15_3.sce b/887/CH15/EX15.3/15_3.sce
new file mode 100755
index 000000000..bd8dc2d16
--- /dev/null
+++ b/887/CH15/EX15.3/15_3.sce
@@ -0,0 +1,19 @@
+clc
+//ex15.3
+M_r=5000;      //relative permeability
+R=10*10^-2;
+r=2*10^-2;
+N=100;      //number of turns
+//complex number 'i' is used as a symbol here
+I=2*%i;      //here 'i' represents sin(200*%pi*t), not as a complex number
+M_o=4*%pi*10^-7;      //permeability of free space
+M=M_r*M_o;      //permeability of the core material
+phi=M*N*I*r^2/(2*R);      //flux
+FL=N*phi;      //flux linkages
+printf(" All the values in the textbook are approximated hence the values in this code differ from those of Textbook")
+disp('In the below two values,i represents sin(200*%pi*t)')      //t-time
+disp(phi,'flux in webers')
+disp(FL,'flux linkages in weber turns')
+//differentiating 'λ' with respect to t
+disp('In the below answer, i represents cos(200*%pi*t)')
+disp(FL*200*%pi,'Voltage induced in the coil in volts')
-- 
cgit