summaryrefslogtreecommitdiff
path: root/260/CH11/EX11.1/11_1.sce
blob: 6b9b081337a2b970ab387924d5ba8b1455230d3c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Eg-11.1
//pg-468


clear
clc

//The time required to heat up the oil from 60 to 90 degrees centigrade is calculated by integrating the function f(T) from 60 to 90.
//Where f(T) = (dT/dt), temperature gradient.

T = [60;90];

for(i = 1:2)
    f(i) = 1/(40-0.3*T(i));
end

//Now the inegration using the formula I = ((T(2)-T(1))/2)*[f(1)+f(2)]

I = ((T(2)-T(1))/2)*(f(1)+f(2)); // Trapezoidal rule

printf('The value of the integral using the formula is  %f\n\n',I)
printf(' The exact value of the integral is 1.75(obtained analytically)\n')
printf(' Note that since the function is nonlinear, the value of the integral is approximate.')