summaryrefslogtreecommitdiff
path: root/3890/CH2/EX2.1/Ex2_1.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3890/CH2/EX2.1/Ex2_1.sce
parentd1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff)
downloadScilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.gz
Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.bz2
Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.zip
Added new codeHEADmaster
Diffstat (limited to '3890/CH2/EX2.1/Ex2_1.sce')
-rw-r--r--3890/CH2/EX2.1/Ex2_1.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/3890/CH2/EX2.1/Ex2_1.sce b/3890/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..3755bf30d
--- /dev/null
+++ b/3890/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,23 @@
+//Electric machines and power systems by Syed A Nasar
+//Publisher:TataMcgraw Hill
+//Year: 2002 ; Edition - 7
+//Example 2.1
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+a1=5*10^-4;a2=10*10^-4; //area of cross sections in m^2
+l1=24*10^-2;l2=8*10^-2; //mean length in m
+ur=500; //relative permiability of the material
+u0=4*3.14*10^-7 //permiabiity of free space
+
+u=ur*u0; //permiablity in H/m
+r1=l1/(u*a1); //reluctance of material with lenght l1
+r2=l2/(u*a2); //reluctance of material with lenght l2
+r_a=r1/2+r2; //net reluctance of a 200 turn coilin H^-1
+r_b=r1*r2/(r1+r2)+r1; //net reluctance of 100 turn coil in H^-1
+
+printf('the net reluctance of 200 turn coil is %2f in H^-1\n',r_a)
+printf('the net reluctance of 100 turn coil is %2f in H^-1\n',r_b)
+