diff options
Diffstat (limited to '3871/CH5/EX5.19')
| -rw-r--r-- | 3871/CH5/EX5.19/Ex5_19.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/3871/CH5/EX5.19/Ex5_19.sce b/3871/CH5/EX5.19/Ex5_19.sce new file mode 100644 index 000000000..b81b35f24 --- /dev/null +++ b/3871/CH5/EX5.19/Ex5_19.sce @@ -0,0 +1,22 @@ +//===========================================================================
+//chapter 5 example 19
+clc;
+clear all;
+
+//variable declaration
+L = 150; //length of working wire at room temperature in mm
+alpha = 16*10^-6; //coefficient of linear expansion
+T = 85; //temperature in ° C
+Si =1; //initial sag in mm
+//calculations
+dL = alpha*L*T; //increase in length of the wire when gets heated through 85 ° C in mm
+M = sqrt(L/(2*dL)); //magnification with no intial sag
+S = sqrt((L*dL)/(2)); //Sag in mm
+Sn = S-Si; //net increase in Sag in mm
+M1 = Sn/(dL); //magnification with initial Sag of 1 mm
+
+//result
+mprintf("magnification with no intial sag = %3.2f",M);
+mprintf("\nSag = %3.2f mm",S);
+mprintf("\nnet increase in Sag =%3.2f mm",Sn);
+mprintf("\nmagnification with initial Sag of 1 mm = %3.2f",M1);
|