diff options
Diffstat (limited to '3888/CH6')
| -rw-r--r-- | 3888/CH6/EX6.1/Ex6_1.JPG | bin | 0 -> 15983 bytes | |||
| -rw-r--r-- | 3888/CH6/EX6.1/Ex6_1.sce | 25 | ||||
| -rw-r--r-- | 3888/CH6/EX6.2/Ex6_2.JPG | bin | 0 -> 13577 bytes | |||
| -rw-r--r-- | 3888/CH6/EX6.2/Ex6_2.sce | 53 |
4 files changed, 78 insertions, 0 deletions
diff --git a/3888/CH6/EX6.1/Ex6_1.JPG b/3888/CH6/EX6.1/Ex6_1.JPG Binary files differnew file mode 100644 index 000000000..a22aa5f5e --- /dev/null +++ b/3888/CH6/EX6.1/Ex6_1.JPG diff --git a/3888/CH6/EX6.1/Ex6_1.sce b/3888/CH6/EX6.1/Ex6_1.sce new file mode 100644 index 000000000..cc70f44da --- /dev/null +++ b/3888/CH6/EX6.1/Ex6_1.sce @@ -0,0 +1,25 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 6.1
+//Scilab Version : 6.0.0 ; OS : Windows
+
+clc;
+clear;
+
+
+reser_catch_area=50; //Catchment area of reservoir in km^2
+avg_rainfall=150; //Average rainfall in cm/year
+station_head=40; //Mean head of station in m
+UF=0.75; //Utilization factor
+LF=0.75; //Load factor
+tur_eff=0.88; //Efficiency of turbine
+gen_eff=0.93; //Efficiency of generator
+water_volume=reser_catch_area*10^6*1.5*UF; //Available water for electricity production in m^3
+Q=water_volume/(365*24*60*60); //Available quantity in m^3/sec
+P=(0.736/75)*Q*1000*station_head*tur_eff*gen_eff; //Power of station in kW
+install_cap_gen=P/LF; //Generator installed capacity in kW
+
+printf("\nThe power is %.2f kW",P);
+printf("\nInstalled capacity of the generator is %.f kW",install_cap_gen);
+ //variation present in result due to wrong calculation of Q value
diff --git a/3888/CH6/EX6.2/Ex6_2.JPG b/3888/CH6/EX6.2/Ex6_2.JPG Binary files differnew file mode 100644 index 000000000..873dda7a1 --- /dev/null +++ b/3888/CH6/EX6.2/Ex6_2.JPG diff --git a/3888/CH6/EX6.2/Ex6_2.sce b/3888/CH6/EX6.2/Ex6_2.sce new file mode 100644 index 000000000..b9c640a84 --- /dev/null +++ b/3888/CH6/EX6.2/Ex6_2.sce @@ -0,0 +1,53 @@ +//Electric Power Generation, Transmission and Distribution by S.N.Singh
+//Publisher:PHI Learning Private Limited
+//Year: 2012 ; Edition - 2
+//Example 6.2
+//Scilab Version : 6.0.0 ; OS : Windows
+
+
+
+clc;
+clear;
+clf;
+
+
+
+q=[500 500 350 200 300 800 1100 900 400 200 0];
+t=0:1:10;
+subplot(3,1,1);
+title("Hydrograph");
+xlabel("Time (Weeks)");
+ylabel("Q (m3/Sec)");
+plot2d2(t,q);
+Avg=sum(q)/max(t); //Average Discharge in a Week in m^3/sec
+percent=[0 1100];
+j=1;
+for temp=1100:-200:100
+ count=0;
+ for i=1:1:11
+ if q(i) >= temp then
+ count=count+1;
+ else
+ count=count+0;
+ end
+ end
+ j=j+1;
+ percent(j,:)=[count*10 temp];
+end
+subplot(3,1,2);
+title("Flow duration curve");
+xlabel("Percentage of time");
+ylabel("Q (m3/Sec)");
+plot2d(percent(:,1),percent(:,2));
+y=cumsum(7*q);
+subplot(3,1,3);
+title("Mass curve");
+xlabel("Time (Weeks)");
+ylabel("Cumulative flow(day-sec-metre)");
+plot2d([1:1:10],resize_matrix(y,-1,10),rect=[0 0 11 40000]);
+
+
+printf("\nAverage weekly discharge is %.f m^3/sec",Avg);
+
+
+
|
