diff options
| author | prashantsinalkar | 2017-10-10 12:38:01 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2017-10-10 12:38:01 +0530 |
| commit | f35ea80659b6a49d1bb2ce1d7d002583f3f40947 (patch) | |
| tree | eb72842d800ac1233e9d890e020eac5fd41b0b1b /3035/CH7 | |
| parent | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (diff) | |
| download | Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.gz Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.bz2 Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.zip | |
updated the code
Diffstat (limited to '3035/CH7')
| -rwxr-xr-x | 3035/CH7/EX7.1/Ex7_1.sce | 35 |
1 files changed, 34 insertions, 1 deletions
diff --git a/3035/CH7/EX7.1/Ex7_1.sce b/3035/CH7/EX7.1/Ex7_1.sce index fbd5dc3a4..8b89a041f 100755 --- a/3035/CH7/EX7.1/Ex7_1.sce +++ b/3035/CH7/EX7.1/Ex7_1.sce @@ -1,4 +1,34 @@ -// Variable Declaration +//find.. + clc + //solution + //given + Tb=3*10^6//N-mm + d=1//m + r=500//mm + u=0.3 + q=0.61//rad + ub=(4*u*sin(q))/(2*q+sin(2*q))//eqivalent coffint of friction + //ref fig 25.12 + //let S be spring force + //taking moment abt fulcrum O1 + //S*1250=Rn1*600 + Ft1*(500-250) + //put Rn1=Ft1/ub... + //S*1250=2125*Ft1 + //Ft1=S*1250/2125 + //taking moment abt O2 + //S*1250+Ft2(500-250)=Rn2*600 + //Rn2=Ft2/ub + //S*1250+Ft2(500-250)=1625Ft2 + //Ft2=S*1250/1625 + //Tb=(Ft1+Ft2)*r=680*S + S=Tb/680 + printf("spring force is,%f N\n",S) + //let b be width of brakes shoes + //Ab=b*(2*r*sin(q))//mm + Ft1=S*1250/2125 + Rn1=Ft1/ub + Ft2=S*1250/1625 + Rn2=Ft2/ub// Variable Declaration V = 400.0 //Voltage supplied(V) f = 50.0 //Frequency(Hz) P_1 = 75.0 //Power of induction motor at middle of distributor(kVA) @@ -41,3 +71,6 @@ if(V_f > V_per) then else printf('Overall cross-sectional area of the 7/3.00 mm Ferret ACSR conductors having overall conductor diameter of 9.0 mm = %.2f mm^2' ,area_f) end + +printf("END") +//End error, but doesn't affect functioning of code
\ No newline at end of file |