summaryrefslogtreecommitdiff
path: root/3826/CH6
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3826/CH6
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3826/CH6')
-rw-r--r--3826/CH6/EX6.25/Ex6_25.sce20
-rw-r--r--3826/CH6/EX6.26/Ex6_26.sce19
-rw-r--r--3826/CH6/EX6.27/Ex6_27.sce15
-rw-r--r--3826/CH6/EX6.28/Ex6_28.sce22
-rw-r--r--3826/CH6/EX6.29/Ex6_29.sce29
-rw-r--r--3826/CH6/EX6.30/Ex6_30.sce25
-rw-r--r--3826/CH6/EX6.31/Ex6_31.sce36
-rw-r--r--3826/CH6/EX6.32/Ex6_32.sce35
-rw-r--r--3826/CH6/EX6.33/Ex6_33.sce28
9 files changed, 229 insertions, 0 deletions
diff --git a/3826/CH6/EX6.25/Ex6_25.sce b/3826/CH6/EX6.25/Ex6_25.sce
new file mode 100644
index 000000000..41c1afb82
--- /dev/null
+++ b/3826/CH6/EX6.25/Ex6_25.sce
@@ -0,0 +1,20 @@
+//the examples are continuously numbered throughout the textbook
+//Example 6_25 page no:345
+clc;
+//given
+beg_cost = 240000;//in rupees
+salvage_val = 24000;//in rupees
+t = 20;//in years
+t1 = 10;//in years
+tot_dep = beg_cost - salvage_val;
+tot_dep_af10 = beg_cost - 108000;
+val = beg_cost * (0.891)^10;
+tot_sink_fund = 216000;//in rupees
+annual_deposit = (0.08 * tot_sink_fund)/((1.08)^20 -1);
+annual_deposit_af10 = (annual_deposit *( 1.08^10-1))/0.08;
+val_plant = beg_cost - annual_deposit_af10;
+disp(tot_dep_af10,"the value calculated in straight line depreciation at the end of 10 years will be ( in rupees)");
+disp(val,"the value calculated in reducing balance depreciation at the end of 10 years will be ( in rupees)");
+disp(val_plant,"the value calculated in sinking fund depreciation at the end of 10 years will be ( in rupees)");
+//the result vary slightly hence values are rounded off in textbook
+
diff --git a/3826/CH6/EX6.26/Ex6_26.sce b/3826/CH6/EX6.26/Ex6_26.sce
new file mode 100644
index 000000000..9fc12fc15
--- /dev/null
+++ b/3826/CH6/EX6.26/Ex6_26.sce
@@ -0,0 +1,19 @@
+//Example 6_26 page no:348
+clc;
+//given
+load1 = 200;//in kW
+load2 = 150;//in kW
+load3 = 50;//in kW
+t1 = 1;//in hour
+t2 = 7;//in hour
+t3 = 8;//in hour
+max_tarrif = 108;//in rupees
+tarrif = 10;//in paise
+max_demand_charge = load1 * max_tarrif;
+total = (load1* t1 * 6 * 52) + (load2* t2 * 6 * 52)+ (load3* t3 * 6 * 52);
+annual_cost = total * 10;
+annual_cost = annual_cost / 100;//converting to rupees
+tot_annual_cost = annual_cost + max_demand_charge;
+avg_cost = tot_annual_cost * 100 / total;
+disp(tot_annual_cost,"the annual energy cost for the industry is (in rupees)");
+disp(avg_cost,"the average cost per unit is (in paise)");
diff --git a/3826/CH6/EX6.27/Ex6_27.sce b/3826/CH6/EX6.27/Ex6_27.sce
new file mode 100644
index 000000000..e38398f85
--- /dev/null
+++ b/3826/CH6/EX6.27/Ex6_27.sce
@@ -0,0 +1,15 @@
+//Example 6_27 page no:356
+clc;
+max_demand = 175;//in kW
+pow_fac = 0.75;
+max_tariff = 72;//in rupees
+tariff = 10;//in paise
+phase_adv = 120;//in rupees/kVA
+loss = 20;//in percentage
+kVA_demand = max_demand / pow_fac;
+max_demand_charge = max_tariff * kVA_demand;
+cos_phi = sqrt(1-((phase_adv * loss)/(max_tariff * 100))^2);
+disp(kVA_demand,"before installation of capacitors the kVA demand is (in kVA)");
+disp(max_demand_charge,"the maximum demand charge is (in rupees)");
+disp(cos_phi,"the power factor is ");
+//the kVA_demand is rounded off in textbook so maximum demand charge vary slightly with textbook
diff --git a/3826/CH6/EX6.28/Ex6_28.sce b/3826/CH6/EX6.28/Ex6_28.sce
new file mode 100644
index 000000000..db199ebfc
--- /dev/null
+++ b/3826/CH6/EX6.28/Ex6_28.sce
@@ -0,0 +1,22 @@
+//Example 6_28 page no:358
+clc;
+//given
+con_req = 1000000;//in units per year
+load_fac = 30;//in percentage
+max_tariff = 120;//in rupees
+tariff = 5;//in paise
+imp_ld_fac = 100;//in percentage
+//sol
+avg_ld = con_req / 8760;
+max_load = avg_ld * imp_ld_fac / load_fac;
+mac_dmd_chc = max_load * max_tariff;
+unit_charge = con_req * tariff / imp_ld_fac;
+tot_charge = mac_dmd_chc + unit_charge;
+avg_price_per_unit = tot_charge * imp_ld_fac / con_req;
+max_load = avg_ld;
+max_dmd_chc = max_load * max_tariff;
+tot_charge = unit_charge + max_dmd_chc;
+avg_price_perUnit = tot_charge * imp_ld_fac / con_req;
+disp(avg_price_per_unit,"the average price per unit before improving the load factor is (in paise)");
+disp(avg_price_perUnit,"the average price per unit after improving the load factor is (in paise)");
+disp(avg_price_per_unit - avg_price_perUnit,"the total savings is (in paise)");
diff --git a/3826/CH6/EX6.29/Ex6_29.sce b/3826/CH6/EX6.29/Ex6_29.sce
new file mode 100644
index 000000000..f37fe42ee
--- /dev/null
+++ b/3826/CH6/EX6.29/Ex6_29.sce
@@ -0,0 +1,29 @@
+//Example 6_29 page no:362
+clc;
+//given
+max_load = 250;//in kW
+annual_load_fac = 40;//in percentage
+voltage = 11;//in kV
+max_tariff = 120;//in rupees
+tariff = 4;//in paise
+diesel_cost = 360;//in rupees per kW
+oil_cost = 6;//in paise
+dep_transformer = 8;//in percentage
+dep_deisel_plant = 12;//in percentage
+transformer_cost = 18;//in rupees per kVA
+//sol
+tot_no_units = max_load * annual_load_fac * 8760 / 100;
+//public supply
+capital_cost = 3 * 150 * transformer_cost;
+yearly_cost = capital_cost * dep_transformer / 100;
+max_demand_charge = max_tariff * max_load;
+unit_cost = tot_no_units * tariff / 100;
+tot_yr_cost = yearly_cost + max_demand_charge + unit_cost;
+//diesel plant
+cost = 3 * 150 * diesel_cost;
+yr_cost = cost * dep_deisel_plant / 100;
+opp_staff_wage = 4800;
+unit_cost = tot_no_units * oil_cost / 100;
+tot_year_cost = yr_cost + opp_staff_wage + unit_cost;
+disp(tot_yr_cost,"the cost of public supply is ( in rupees)");
+disp(tot_year_cost,"the cost of diesel plant is ( in rupees)");
diff --git a/3826/CH6/EX6.30/Ex6_30.sce b/3826/CH6/EX6.30/Ex6_30.sce
new file mode 100644
index 000000000..ce087bb03
--- /dev/null
+++ b/3826/CH6/EX6.30/Ex6_30.sce
@@ -0,0 +1,25 @@
+//Example 6_30 page no:364
+clc;
+//given
+power = 37;//in kW
+motor_cost_a = 1440;//in rupees
+eff_a = 88;//in percentage
+motor_cost_b = 1920;//in rupees
+eff_b = 89;//in percentage
+opp = 3000;//in hours
+tariff = 6;//in paise per kWH
+dep = 10;//in percentage in per year
+output = 37;//in kW
+//motor A
+cap_charge = motor_cost_a * dep / 100;
+loss = ((1/0.88)-1) * output;
+yr_cost_loss_a = loss * opp * tariff / 100;
+disp(yr_cost_loss_a,"the yearly cost of motor A is (in rupees)");
+//motor B
+cap_charge = motor_cost_b * dep / 100;
+loss = ((1/0.89)-1) * output;
+yr_cost_loss_b = loss * opp * tariff / 100;
+disp(yr_cost_loss_b,"the yearly cost of motor B is (in rupees)");
+disp("the motor B gives the lower yearly cost");
+//the value of cost vary with textbook hence values are rounded off in textbook but the result is same
+
diff --git a/3826/CH6/EX6.31/Ex6_31.sce b/3826/CH6/EX6.31/Ex6_31.sce
new file mode 100644
index 000000000..8c3a93232
--- /dev/null
+++ b/3826/CH6/EX6.31/Ex6_31.sce
@@ -0,0 +1,36 @@
+//Example 6_31 page no:366
+clc;
+//given
+power = 75;//in kW
+t1 = 1000;//in hours
+t2 = 2000;//in hours
+full_load_eff_a = 0.89;
+full_load_eff_b = 0.90;
+half_load_eff_a = 0.88;
+half_load_eff_b = 0.89;
+tariff = 7.5;//in paise
+dep = 0.12;
+motor_cost_a = 3120;//in rupees
+full_load_output = 75;//in kW
+half_load_output = 37.5;//in kW
+//motor A
+full_load_loss_a = full_load_output * ((1/full_load_eff_a)-1);
+full_yearly_loss_a = full_load_loss_a * t1;
+half_load_loss_a = half_load_output * ((1/half_load_eff_a)-1);
+half_yearly_loss_a = half_load_loss_a * t2;
+tot_yr_loss_a = full_yearly_loss_a + half_yearly_loss_a;
+yr_cost_loss_a = tot_yr_loss_a * tariff / 100;
+//motor B
+full_load_loss_b = full_load_output * ((1/full_load_eff_b)-1);
+full_yearly_loss_b = full_load_loss_b * t1;
+half_load_loss_b = half_load_output * ((1/half_load_eff_b)-1);
+half_yearly_loss_b = half_load_loss_b * t2;
+tot_yr_loss_b = full_yearly_loss_b + half_yearly_loss_a;
+yr_cost_loss_b = tot_yr_loss_b * tariff / 100;
+yr_saving = yr_cost_loss_a - yr_cost_loss_b;
+cap_value = yr_saving * 100/12;
+disp(yr_saving,"the yearly savings in loss is ( in rupees)");
+disp(cap_value,"the capitalised value is(in rupees)");
+disp((cap_value+motor_cost_a),"if motor cost of B is less than this(in rupees)");
+disp("motor B would be cheaper");
+//the mathematical calculation in textbook is wrong
diff --git a/3826/CH6/EX6.32/Ex6_32.sce b/3826/CH6/EX6.32/Ex6_32.sce
new file mode 100644
index 000000000..dd59beaeb
--- /dev/null
+++ b/3826/CH6/EX6.32/Ex6_32.sce
@@ -0,0 +1,35 @@
+//Example 6_32 page no:367
+clc;
+//given
+power = 75;//in kW
+t1 = 4000;//in hours
+cost = 3600;//in rupees
+motor_eff = 0.91;
+pow_fac = 0.89;
+trans_cost = 18;//in rupees per kVA
+dep = 0.8;
+transformer_cost = 6000;//in rupees
+trans_eff = 0.91;
+trans_pow_fac = 0.89;
+max_tariff = 108;
+tariff = 4;
+output = 75;//in kW
+//sol
+kVA_input = output/(pow_fac*motor_eff);
+cost_of_trans = 100 * trans_cost;
+tot_cap_cost = cost + cost_of_trans;
+annual_cost = tot_cap_cost * 8/100;
+ove_eff = trans_eff * 0.98;
+loss = ((1/ove_eff)-1)*power;
+yr_cost_loss = (loss * t1 * tariff)/100;
+max_demand = power / (motor_eff*0.98*trans_pow_fac);
+max_demand_chc = max_demand * max_tariff;
+tot_cost = max_demand_chc + yr_cost_loss + annual_cost;
+yr_cap_cost = transformer_cost * 12 /100;
+loss = ((1/motor_eff)-1)*power;
+yr_cost_of_loss = loss * t1 * tariff / 100;
+max_dmd_chc = 92.5 * max_tariff;
+total_cost = max_dmd_chc + yr_cost_of_loss + yr_cap_cost;
+saving = tot_cost - total_cost;
+disp(saving,"the total yearly saving is (in rupees)");
+//the calculation for loss is wrong in textbook so the result of saving vary with textbook
diff --git a/3826/CH6/EX6.33/Ex6_33.sce b/3826/CH6/EX6.33/Ex6_33.sce
new file mode 100644
index 000000000..1415391bc
--- /dev/null
+++ b/3826/CH6/EX6.33/Ex6_33.sce
@@ -0,0 +1,28 @@
+//Example 6_33 page no:368
+clc;
+//given
+lumen = 1000000;//in lumen-hours
+power = 100;//in W
+voltage = 230;//in V
+voltage2 = 210;//in V
+cost = 3;//in rupees
+life = 1000;//in hours
+enf_cost = 5;//in paise
+lumen_output = 1160;
+//sol
+//210V lamps
+no_of_hrs = lumen / lumen_output;
+cost_of_lamp = no_of_hrs * cost / life;
+cost_of_eng = no_of_hrs * power * enf_cost / ( power *life);
+tot_cost = cost_of_eng + cost_of_lamp;
+//230V lamps operating at 210V
+lumen_output = 810;
+life = 2750;
+power = 87.5;
+no_of_hrs = lumen / lumen_output;
+cost_of_lamp = no_of_hrs * cost / life;
+cost_of_eng = no_of_hrs * power * enf_cost / ( 100 *1000);
+total_cost = cost_of_eng + cost_of_lamp;
+disp(tot_cost,"the total cost of 210V lamps is (in rupees)");
+disp(total_cost,"the total cost of 230V lamps is (in rupees)");
+disp("230V lamps are 2% cheaper than 210V lamps");