diff options
Diffstat (limited to '3782/CH10/EX10.6')
| -rw-r--r-- | 3782/CH10/EX10.6/Ex10_6.sce | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/3782/CH10/EX10.6/Ex10_6.sce b/3782/CH10/EX10.6/Ex10_6.sce new file mode 100644 index 000000000..2674fec83 --- /dev/null +++ b/3782/CH10/EX10.6/Ex10_6.sce @@ -0,0 +1,25 @@ + +// + +// + +r1=400 +t1=30,d=200, + +ct1=1500 +k=1-(cos(t1*(%pi/180))) +T1G=r1*(k) + +r2=(d-T1G)/k +printf("\n R2= %0.3f ",r2) + +t1t2=(%pi*r1*t1)/180 +t2t3=(%pi*r2*t1)/180 +printf("\n length of arc T1T2= %0.3f ",t1t2) +printf("\n length of arc T2T3= %0.3f ",t2t3) + +ct2=ct1+t1t2 +ct3=ct2+t2t3 + +printf("\n chainage of point of reverse curvature = %0.3f ",ct2) +printf("\n chainage of finishing point T3= %0.3f ",ct3) |