diff options
Diffstat (limited to '1367/CH7/EX7.5')
-rwxr-xr-x | 1367/CH7/EX7.5/7_5.sce | 15 | ||||
-rwxr-xr-x | 1367/CH7/EX7.5/7_5r.txt | 5 |
2 files changed, 20 insertions, 0 deletions
diff --git a/1367/CH7/EX7.5/7_5.sce b/1367/CH7/EX7.5/7_5.sce new file mode 100755 index 000000000..833324e44 --- /dev/null +++ b/1367/CH7/EX7.5/7_5.sce @@ -0,0 +1,15 @@ +//Find Stress
+//Ex:7.5
+clc;
+clear;
+close;
+n=3;
+a=300;
+v_cr=2.8*10^-8;// in cm/cm/hour creep rate
+x=log(v_cr)-n*log(a);
+a1=exp(x);
+t=365*24;//in hours
+e=2*10^6;//kgf/sqcm
+ai=750;//in kgf/sqcm
+a_tf=sqrt(1/((1/ai^(n-1))+(a1*e*(n-1)*t)));
+disp(a_tf,"Stress Remaining (in kgf/sq cm) = ");
\ No newline at end of file diff --git a/1367/CH7/EX7.5/7_5r.txt b/1367/CH7/EX7.5/7_5r.txt new file mode 100755 index 000000000..7e3d446c7 --- /dev/null +++ b/1367/CH7/EX7.5/7_5r.txt @@ -0,0 +1,5 @@ +
+ Stress Remaining (in kgf/sq cm) =
+
+ 161.97533
+
\ No newline at end of file |