summaryrefslogtreecommitdiff
path: root/1898/CH10/EX10.10/Ex10_10.sce
blob: 05a8d31667c0aedd043b06145ff53321d8f8c574 (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
32
33
34
35
36
37
38
clear all; clc;

disp("Scilab Code Ex 10.10 : ")

//Given:
a = 300; //mm
b = 50; //mm
t = 20; //mm
E_cu = 120*10^3; //MPa
nu_cu = 0.34;// Poisson's ratio

//By inspection:
sigma_x = 800; //MPa
sigma_y = -500; //MPa
tou_xy = 0;
sigma_z = 0;

//By Hooke's Law:
ep_x = (sigma_x/E_cu) - (nu_cu/E_cu)*(sigma_y + sigma_z);
ep_y = (sigma_y/E_cu) - (nu_cu/E_cu)*(sigma_x + sigma_z);
ep_z = (sigma_z/E_cu) - (nu_cu/E_cu)*(sigma_y + sigma_x);

//New lengths:

a_dash = a + ep_x*a;
b_dash = b + ep_y*b;
t_dash = t + ep_z*t;

//Display:

printf('\n\nThe new length     = %1.2fmm ',a_dash);
printf('\nThe new width      = %1.2f mm ',b_dash);
printf('\nThe new thickness  = %1.2f mm ',t_dash);
//--------------------------------------------------------------------------END--------------------------------------------------------------------------------------