diff options
| author | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
|---|---|---|
| committer | prashantsinalkar | 2018-02-03 11:01:52 +0530 |
| commit | 7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch) | |
| tree | 449d555969bfd7befe906877abab098c6e63a0e8 /3863/CH3/EX3.9/Ex3_9.sce | |
| parent | d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff) | |
| download | Scilab-TBC-Uploads-master.tar.gz Scilab-TBC-Uploads-master.tar.bz2 Scilab-TBC-Uploads-master.zip | |
Diffstat (limited to '3863/CH3/EX3.9/Ex3_9.sce')
| -rw-r--r-- | 3863/CH3/EX3.9/Ex3_9.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/3863/CH3/EX3.9/Ex3_9.sce b/3863/CH3/EX3.9/Ex3_9.sce new file mode 100644 index 000000000..8aacb78f1 --- /dev/null +++ b/3863/CH3/EX3.9/Ex3_9.sce @@ -0,0 +1,22 @@ +clear +// + +//Given +//Variable declaration +sigma1=100 //Major principal stress in N/sq.mm +sigma2=-40 //Minor principal stress in N/sq.mm +theta=90-60 //Angle of inclination in degrees + +//Calculation +sigman=((sigma1+sigma2)/2)+(((sigma1-sigma2)/2)*cos((%pi/180)*(2*theta))) +sigmat=((sigma1-sigma2)/2*(sin((%pi/180)*(2*theta)))) + +sigmaR=(sqrt(sigman**2+sigmat**2)) + +sigmat_max=int((sigma1-sigma2)/2) +phi=int((180/%pi)*(atan(sigmat/sigman))) + +//Result +printf("\n Resultant stress in magnitude = %0.3f N/mm^2",sigmaR) +printf("\n Direction of resultant stress = %0.3f degrees",phi) +printf("\n Maximum shear stress = %0.3f N/mm^2",sigmat_max) |