Prob. 4.2- bolt restart Digits: =4: Diameter. initial force area >d:=.008:F[0]:=1000:A:=Pi*d^2/4: Initial stress sigma [0]: = evalf(F [O]/A)i 989108 Modulus: function of time(Pa) EE:=t→>5*exp(-t^(1/3))*10^9 Strain(remains constant) epsilon [0]: =evalf(sigma[O]/EE(O)) 003978 Force at 24 hrs (n) > F[24]: =evalf(epsilon[O]*EE(24)*A)i
Prob. 4.2 - bolt > restart; > Digits:=4: Diameter, initial force, area > d:=.008:F[0]:=1000:A:=Pi*d^2/4: Initial stress > sigma[0]:=evalf(F[0]/A); σ0 := .1989 108 Modulus: function of time (Pa) > EE:= t -> 5*exp(-t^(1/3))*10^9: Strain (remains constant) > epsilon[0]:=evalf(sigma[0]/EE(0)); ε0 := .003978 Force at 24 hrs (N) > F[24]:=evalf(epsilon[0]*EE(24)*A); F24 := 55.91 Page 1
