summaryrefslogtreecommitdiff
path: root/3871/CH5/EX5.2/Ex5_2.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3871/CH5/EX5.2/Ex5_2.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 '3871/CH5/EX5.2/Ex5_2.sce')
-rw-r--r--3871/CH5/EX5.2/Ex5_2.sce26
1 files changed, 26 insertions, 0 deletions
diff --git a/3871/CH5/EX5.2/Ex5_2.sce b/3871/CH5/EX5.2/Ex5_2.sce
new file mode 100644
index 000000000..be3b32475
--- /dev/null
+++ b/3871/CH5/EX5.2/Ex5_2.sce
@@ -0,0 +1,26 @@
+//===========================================================================
+//chapter 5 example 2
+
+clc;clear all;
+
+//Variable declaration
+I = 5; //current in A
+d = 30; //deflection
+I2 = 10;
+
+//calculations
+//L = 10+5*theta - 2*(theta^2) //inductancein uH
+//partial differentiate w.r.t to theta
+//dL/dtheta = x = 5- 4*theta
+//dL/dtheta = 2*K*theta/(I^2)
+//x = 10-4*theta
+theta = %pi/(6);
+K = (((5-(4*theta))*10^-6)*(I^2))/(2*theta) //spring constant in Nm/radian
+x = ((2*K)/(I2^2))*10^6;
+theta2 = (5)/(x+4);
+
+//result
+
+mprintf("spring constant = %3.4e Nm/radian",K);
+mprintf("\ndeflection for 10 A current = %3.3f radian",theta2);
+