summaryrefslogtreecommitdiff
path: root/2213/CH7/EX7.1/ex_7_1.sce
blob: 2a9c8508ef6f44edb6eed76fc65cc64a30d24159 (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
26
27
28
29
//Example 7.1.//distance,average speed and scheduled speed
clc;
clear;
close;
format('v',6)
a=5;//aceleration in kmphps
t1=30;//in seconds
vm=a*t1;//maximum speed in kmph
tfr=10;//time for free running in mins
b=5;//retardation in kmphps
ts=vm/b;//time for retardation in seconds
dta=((vm*t1)/(2*3600));//distance travelled during acceleration period
dtfr=((vm*tfr*60)/(3600));//distance travelled during retardation period
dtbp=dta;//distance travelled during breaking period
td=dta+dtfr+dtbp;//total distance between stations
disp("part (a) ")
disp(td,"total distance between station in km")
T=[0;t1;(t1+(tfr*60));(t1+(t1+(tfr*60)))];//
V=[0;vm;vm;0];//
plot2d(T,V)
xlabel("Time in seconds ")
ylabel("Spped in Km per Hour")
va=(td*3600)/(t1+(tfr*60)+ts);//average speed in kmph
disp("part (b) ")
disp(va,"average speed in kmph")
tst=5;//stop time in mins
vs=(td*3600)/(t1+(tfr*60)+ts+(tst*60));//sheduled speed in kmph
disp("part (c) ")
disp(vs,"sheduled speed in kmph")