diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /914/CH3/EX3.2/ex3_2.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '914/CH3/EX3.2/ex3_2.sce')
| -rwxr-xr-x | 914/CH3/EX3.2/ex3_2.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/914/CH3/EX3.2/ex3_2.sce b/914/CH3/EX3.2/ex3_2.sce new file mode 100755 index 000000000..0db37b9bb --- /dev/null +++ b/914/CH3/EX3.2/ex3_2.sce @@ -0,0 +1,23 @@ +clc;
+warning('off');
+printf("\n\n example3.2 - pg68");
+// given
+syms x;
+SIx2=-3.8*10^5; //[j*m^-2*sec^-1] - flux at x=0.1,i.e through face2
+Qgen=1.5*10^6; //[j*m^-3*sec^-1] - uniform generation in the volume
+T2=100+273.15; //[K] temperature at face 2
+x2=0.1; //[m]
+k=380; //[W/mK] - thermal conductivity
+// using the equation der(SIx)*x=SIx+c1;where c1 is tyhe constant of integration
+c1=(Qgen*x2)-SIx2;
+disp(c1)
+SIx=Qgen*x-c1;
+disp(SIx,"SIx=");
+printf("\n where SIx is in units of j m^-2 sec^-1 and x is in units of m");
+// using the equation -k*T=der(SIx)*x^2-c1*x+c2;where c2 is the constant of integration
+c2=-k*T2-(Qgen*(x2)^2)/2+c1*x2;
+T=-(Qgen/k)*x^2+(c1/k)*x-(c2/k);
+disp(T,"T=");
+printf("\n where T is in units of kelvin(K)");
+
+
|