summaryrefslogtreecommitdiff
path: root/1586/CH12/EX12.1/EXP12_1.sce
blob: 7eb9b1889aa386c7b04fc337ceb90d7b08d106e4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc;funcprot(0);//EXAMPLE 12.1
// 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")