summaryrefslogtreecommitdiff
path: root/3782/CH10/EX10.1/Ex10_1.sce
blob: 7a9a7b93015f89432181304c530655d0b21d58c5 (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

//ch-10 page 379   pb-1
//

//

r=275
t=24
l=1320.5

tl=r*tan((t/2)*(%pi/180))
printf("\n Tangent length = %0.3f ",tl)
llc=2*r*sin((t/2)*(%pi/180))
printf("\n Length long of cord= %0.3f ",llc)
loc=(%pi*r*t/180)
printf("\n Length of curve = %0.3f ",loc)
coc=l-tl
ct=coc+loc
printf("\n chainage of commencement = %0.3f ",coc)
printf("\n chainage of tangency = %0.3f ",ct)
k=cos((t/2)*%pi/180)
ad=r*((1/k)-1)
printf("\n apex distance = %0.3f ",ad)
k1=cos((t/2)*(%pi/180))
vsc=r*(1-k1)
printf("\n versed sine of curve is %0.3f ",vsc)