diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /38/CH1/EX1.1 | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '38/CH1/EX1.1')
-rwxr-xr-x | 38/CH1/EX1.1/1.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/38/CH1/EX1.1/1.sce b/38/CH1/EX1.1/1.sce new file mode 100755 index 000000000..d3705bbfa --- /dev/null +++ b/38/CH1/EX1.1/1.sce @@ -0,0 +1,23 @@ +// Caption: Finding reluctances and flux
+
+clear;
+close;
+clc;
+U_r=70000;
+U_o=4*%pi*10^-7;
+
+function [R_c]=reluctance_core(l,A)
+ R_c=l/(U_r*U_o*A);
+endfunction
+disp(reluctance_core(.3,9*10^-4),'Reluctance of the core=')
+
+function [R_g]=reluctance_gap(g,A)
+ R_g=g/(U_o*A);
+endfunction
+disp(reluctance_gap(5*10^-4,9*10^-4),'Reluctance of the gap=')
+
+phy=1.0*9*10^-4;
+disp(phy,'flux=')
+
+i=phy*(reluctance_core(.3,9*10^-4)+reluctance_gap(5*10^-4,9*10^-4))/500;
+disp(i,'current=')
|