summaryrefslogtreecommitdiff
path: root/3705/CH2/EX2.8/Ex2_8.sce
blob: 6f0fac5ebf6636d52e299a1be36c4fc8ae316023 (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

clear//

//NOTE:The NOtation has been changed to ease coding
//Variable Declaration
d=0.005 //difference in length in inch
L=10 //Length in inch
//Area of copper and aluminium in sq.in
Ac=2 //Area of copper 
Aa=3 //Area of aluminium 
//Modulus of elasticity of copper and aluminium in psi
Ec=17000000 //Copper
Ea=10**7 //Aluminium
//Allowable Stress in psi
Sc=20*10**3 //Copper
Sa=10*10**3 //Aluminium

//Calculation
//Equilibrium is Pc+Pa=P
//Hookes Law is delta_c=delta_a+0.005
//Simplfying the solution we have constants we can directly compute
A=d*Ec*(L+d)**-1
B=Ec*Ea**-1
C=L*B*(L+d)**-1
sigma_a=(Sc-A)*C**-1

//Using equilibrium equation
P=Sc*Ac+sigma_a*Aa //Safe load in lb

//Result
printf("\n The safe load on the structure is %0.0f lb",P)