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 /503/CH3/EX3.13/ch3_13.sci | |
| 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 '503/CH3/EX3.13/ch3_13.sci')
| -rwxr-xr-x | 503/CH3/EX3.13/ch3_13.sci | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/503/CH3/EX3.13/ch3_13.sci b/503/CH3/EX3.13/ch3_13.sci new file mode 100755 index 000000000..45d307cb6 --- /dev/null +++ b/503/CH3/EX3.13/ch3_13.sci @@ -0,0 +1,37 @@ +// Comparing all-day efficiencies for diff given load cycles
+
+clc;
+
+r=15; // kva rating
+n_max=.98;
+pf=1;
+P_o=20;
+P_i=r*(1-n_max)/2;
+k=r*pf/P_o;
+P_c=P_i/(k^2);
+function [W_o,W_in]=power(P_o,h)
+ k=P_o/20;
+ P_c=P_i*P_o/r;
+ W_o=P_o*h;
+ W_in=(P_o+P_i+(k^2)*P_c)*h;
+endfunction
+
+//(a)full load of 20kva 12hrs/day and no load rest of the day
+a=[20 12];
+[W_oa(1),W_ina(1)]=power(a(1),a(2));
+aa=[0 12];
+[W_oa(2),W_ina(2)]=power(aa(1),aa(2));
+disp(W_oa,'W_o(kWh) for a');
+disp(W_ina,'W_in(kWh) for a');
+n_ada=sum(W_oa)/sum(W_ina); disp(n_ada*100,'n_allday(a) in %age');
+
+//(b)full load of 20kva 4hrs/day and .4 of full load rest of the day
+b=[20 4];
+[W_ob(1),W_inb(1)]=power(b(1),b(2));
+bb=[8 20];
+[W_ob(2),W_inb(2)]=power(bb(1),bb(2));
+disp(W_ob,'W_o(kWh) for b');
+disp(W_inb,'W_in(kWh) for b');
+n_adb=sum(W_ob)/sum(W_inb); disp(n_adb*100,'n_allday(b) in %age');
+
+
|