diff options
Diffstat (limited to '3526/CH12/EX12.1/EX12_1.sce')
| -rw-r--r-- | 3526/CH12/EX12.1/EX12_1.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3526/CH12/EX12.1/EX12_1.sce b/3526/CH12/EX12.1/EX12_1.sce new file mode 100644 index 000000000..91b7e714f --- /dev/null +++ b/3526/CH12/EX12.1/EX12_1.sce @@ -0,0 +1,13 @@ +clc;funcprot(0);//EXAMPLE 12.1
+//page 347
+// Initialisation of Variables
+r1=0.111;......//Rate of copper in min^-1 at 135 degree celsius
+r2=0.004;.......//Rate of copper in min^-1 at 88 degree celsius
+T1=408;.......//Temperature in K
+T2=361;.......//Temperature in K
+R=1.987;......//Gas constant
+Q=20693;.......//Change in Rates
+slope=(log(r1)-log(r2))/((1/T1)-(1/T2));....//Slope of the straight line ploted ln(Growth rate) as a function of 1=T,
+A=r1/(exp(-Q/(R*T1)));.....//Constant
+disp(A,"Constant A=")
+disp(slope,"Slpoe of the straight line -Q/R")
|