summaryrefslogtreecommitdiff
path: root/2354/CH18/EX18.1/18_1.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2354/CH18/EX18.1/18_1.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2354/CH18/EX18.1/18_1.sce')
-rwxr-xr-x2354/CH18/EX18.1/18_1.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/2354/CH18/EX18.1/18_1.sce b/2354/CH18/EX18.1/18_1.sce
new file mode 100755
index 000000000..1da993fec
--- /dev/null
+++ b/2354/CH18/EX18.1/18_1.sce
@@ -0,0 +1,14 @@
+//example 18.1
+clc; funcprot(0);
+// Initialization of Variable
+G1=600;//G1=Glambda
+alpha=0.85;
+G=G1*(2.5-1)*0.5+G1*0.5*(0.5)+G1*(1.0-0.5);
+disp(G,"total radiation in W/m^2");
+Gabs=alpha*G;
+disp(Gabs,"absorbed radiation in W/m^2");
+J=0.15*G+525;
+disp(J,"total radiosity");
+qrad=525-Gabs;
+disp(qrad,"net radiative flux leaving the surface in W/m^2");
+clear()