summaryrefslogtreecommitdiff
path: root/2123/CH3/EX3.4/Exa_3_4.sce
blob: 58416902ac13fbdbef63e6f5b61756701e97511a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
//Example No. 3.4
clc;
clear;
close;
format('v',6);

//Given Data : 
MotorOutput=200;//KW
v=60;//Km/hr
w=400;//KN
friction=5;//N/KN weight
tan_theta=1/100;//inclination
g=9.81;// gravity constant

//Solution : 
sin_theta=tan_theta;
W_sin_theta=w*1000*sin_theta;//N
R=friction*W_sin_theta/10;//frictional resistance in N
P=W_sin_theta+R;//N
v=60*1000/60/60;//m/s
Power=P*v;//Watt
Pdash=MotorOutput*1000-Power;//Power causes acceleration in watt or N-m/s
m=w*1000/g;//in Kg
a=Pdash/m;//in m/s^2
disp(a,"Acceleration in m/s^2 : ");