blob: f5d88e8e165eea48223f1905da924d9710334198 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
//Exa2.32
clc;
clear;
close;
//given data
T_lower=10;// in degree C
T_upper=150;// in degree C
// Thermo-electric power for iron at any temperature T degree C w.r.t. lead is given by (17.34-0.0487 T)*10^-6 and that for copper by (1.36-.0095 T)*10^-6
// Thermo-electric power, P=dE/dT
// or dE=P*dT
// Thermo-emf for copper between temperature 10 degree C and 150 degree C,
E_c= integrate('(1.36-0.0095*T)*10^-6','T',T_lower,T_upper);
// Thermo-emf for iron between temperature 10 degree C and 150 degree C,
E_i= integrate('(17.34-0.0487*T)*10^-6','T',T_lower,T_upper);
// Thermo-emp for copper-iron thermo-couple
E=E_i-E_c;
disp("Thermo-emf for iron between temperature 10 degree C and 150 degree C is : "+string(E*10^6)+" micro V");
|
