summaryrefslogtreecommitdiff
path: root/3864/CH4/EX4.21/Ex4_21.sce
blob: d8a38b8be7122000105c4f7dfbd4a6405341dcdb (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
30
31
32
33
34
35
36
37
38
39
40
clear
//

//Initilization of Variables

//Wooden Beam

b=150 //mm //width
d=250 //mm //Depth

L=5000 //mm //span
m=11.2 //N/mm**2 //Max Bending stress
sigma=0.7 //N/mm**2 //Max shear stress

//Calculations

//Let 'a' be the distance from left support
//Max shear force
//F=R_A=W*(L-a)*L**-1 

//Max Moment
//M=W*(L-a)*a*L**-1

//But M=sigma*Z
//W*(L-a)*a*L**-1=m*1*6**-1*b*d**2   .....................(1)

//In Rectangular Section MAx stress is 1.5 times Avg shear stress
F=sigma*b*d*1.5**-1

//W*(L-a)*L**-1=F                     .....................(2)

//Dividing Equation 1 nad 2 we get
a=m*6**-1*b*d**2*1.5*(sigma*b*d)**-1

//Sub above value in equation 2 we get
W=(L-a)**-1*L*F*10**-3 //KN  

//Result
printf("\n Load is %0.2f  KN",W)
printf("\n Distance from Left support is %0.2f  mm",a)