diff options
Diffstat (limited to '1844/CH3/EX3.12/3Q12.sce')
| -rw-r--r-- | 1844/CH3/EX3.12/3Q12.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1844/CH3/EX3.12/3Q12.sce b/1844/CH3/EX3.12/3Q12.sce new file mode 100644 index 000000000..30e4cf2ad --- /dev/null +++ b/1844/CH3/EX3.12/3Q12.sce @@ -0,0 +1,15 @@ +clc
+L=20 // in m
+a = 6.2*10^(-6)//in ()1 degree F)^-1
+Tm=80
+To=55
+Ct= L * a * (Tm-To)
+P=16
+Po=10
+W=0.8 // in kg
+E=2.109*10^6 // in kg/cm^2
+A= W/(20*100*7.86*10^(-3))
+Cp= (P-Po)*20/(A*E)
+Cs= L*(W^2)/(24*P^2)
+Tc=Ct+Cp-Cs
+printf('Total correction = %f m',Tc)
|