diff options
Diffstat (limited to '1682/CH2')
| -rwxr-xr-x | 1682/CH2/EX2.1/Exa2_1.sce | 28 | ||||
| -rwxr-xr-x | 1682/CH2/EX2.2/Exa2_2.sce | 45 | ||||
| -rwxr-xr-x | 1682/CH2/EX2.3/Exa2_3.sce | 20 | ||||
| -rwxr-xr-x | 1682/CH2/EX2.4/Exa2_4.sce | 23 | ||||
| -rwxr-xr-x | 1682/CH2/EX2.5/Exa2_5.sce | 18 | ||||
| -rwxr-xr-x | 1682/CH2/EX2.6/Exa2_6.sce | 33 |
6 files changed, 167 insertions, 0 deletions
diff --git a/1682/CH2/EX2.1/Exa2_1.sce b/1682/CH2/EX2.1/Exa2_1.sce new file mode 100755 index 000000000..4e40de48c --- /dev/null +++ b/1682/CH2/EX2.1/Exa2_1.sce @@ -0,0 +1,28 @@ +//Exa2.1
+clc;
+clear;
+close;
+//Part a : Cost of using aluminium metal for the jet engine part
+//given data :
+w1=1.2;//in Kg
+//let c1=cost of making aluminium casting
+//let c2=cost of machining aluminium casting per unit
+//let Tc=Total cost of jet engine part made of aluminium per unit
+c1=80;//in Rs/Kg
+c2=150;//in Rs
+Tc1=c1*w1+c2;//in Rs
+disp(Tc1,"Total cost of jet engine part made of aluminium per unit in Rs : ");
+
+//Part b : Cost of jet engine part made of steel/unit
+//given data :
+w2=1.35;//in Kg
+//let c1=cost of making steel casting
+//let c2=cost of machining steel casting per unit
+//let c3=penalty of excess weight of steel casting
+//let Tc=Total cost of jet engine part made of steel per unit
+c1=35;//in Rs/Kg
+c2=170;//in Rs
+c3=1300;//in Rs/Kg
+Tc2=c1*w2+c2+c3*(w2-w1);//in Rs
+disp(Tc2,"Total cost of jet engine part made of steel per unit in Rs : ");
+disp(Tc2-Tc1,"DECISION : The total cost/unit of a jet engine part made of aluminium is less than that for an engine made of steel. Hence, aluminium is suggested for making jet engine part. The economic advantage of aluminium over steel per unit in Rs : ")
\ No newline at end of file diff --git a/1682/CH2/EX2.2/Exa2_2.sce b/1682/CH2/EX2.2/Exa2_2.sce new file mode 100755 index 000000000..08a3ab43a --- /dev/null +++ b/1682/CH2/EX2.2/Exa2_2.sce @@ -0,0 +1,45 @@ +//Exa2.2
+clc;
+clear;
+close;
+//given data for table with wooden top
+wood=0.1;//in m^3
+WoodCost=12000;//in Rs/m^3
+Table=1;//in units
+TableTopCost=3000;//in Rs/unit
+LegBushes=4;//units
+LegBushesCost=10;//Rs/units
+Nails=100;//in grams
+NailsCost=300;//in Rs/Kg
+TotalLabour=15;//in Hours
+TotalLabourCost=50;//in Rs/Hours
+//Part a : Cost of table with wooden top
+WoodCostframelegs=WoodCost*wood;//in Rs
+WoodTopCost=3000;//in Rs
+BushesCost=LegBushesCost*LegBushes;//in Rs
+NailsCost=Nails*NailsCost/1000;//in Rs
+LabourCost=TotalLabourCost*TotalLabour;//in Rs
+TotalCost1=WoodCostframelegs+WoodTopCost+BushesCost+NailsCost+LabourCost;//in Rs
+disp(TotalCost1,"Cost of Table with wooden top in Rs : ");
+
+//given data for table with granite top
+wood=0.15;//in m^3
+WoodCost=12000;//in Rs/m^3
+Granite=1.62;//in m^2
+GraniteCost=800;//in Rs/m^2
+LegBushes=4;//units
+LegBushesCost=25;//Rs/units
+Nails=50;//in grams
+NailsCost=300;//in Rs/Kg
+TotalLabour=8;//in Hours
+TotalLabourCost=50;//in Rs/Hours
+//Part b : Cost of table with granite top
+WoodCostframelegs=WoodCost*wood;//in Rs
+GraniteTopCost=Granite*GraniteCost;//in Rs
+BushesCost=LegBushesCost*LegBushes;//in Rs
+NailsCost=Nails*NailsCost/1000;//in Rs
+LabourCost=TotalLabourCost*TotalLabour;//in Rs
+TotalCost2=WoodCostframelegs+GraniteTopCost+BushesCost+NailsCost+LabourCost;//in Rs
+disp(TotalCost2,"Cost of Table with Granite top in Rs : ");
+//Economic Advantage
+disp(TotalCost1-TotalCost2,"Economic advantage of table with granite top in Rs : ")
\ No newline at end of file diff --git a/1682/CH2/EX2.3/Exa2_3.sce b/1682/CH2/EX2.3/Exa2_3.sce new file mode 100755 index 000000000..202d1ec63 --- /dev/null +++ b/1682/CH2/EX2.3/Exa2_3.sce @@ -0,0 +1,20 @@ +//Exa2.3
+clc;
+clear;
+close;
+//given data
+LatheCost=200;//in Rs/hour
+grinderCost=150;//in Rs/hour
+//given data for Design A
+HoursOfLathe=16;//in hours/1000Unit
+HoursOfGrinder=4.5;//in hours/1000Unit
+TotalCostA=LatheCost*HoursOfLathe+grinderCost*HoursOfGrinder;//in Rs/1000unit
+disp(TotalCostA*100000/1000,"Total cost of design A per 100,000 units : ");
+
+//given data for Design B
+HoursOfLathe=7;//in hours/1000Unit
+HoursOfGrinder=12;//in hours/1000Unit
+TotalCostB=LatheCost*HoursOfLathe+grinderCost*HoursOfGrinder;//in Rs/1000unit
+disp(TotalCostB*100000/1000,"Total cost of design A per 100,000 units : ");
+//Economic Advantage
+disp(TotalCostA*100-TotalCostB*100,"Economic advantage of design B over design A per 100,000 units in Rs : ");
\ No newline at end of file diff --git a/1682/CH2/EX2.4/Exa2_4.sce b/1682/CH2/EX2.4/Exa2_4.sce new file mode 100755 index 000000000..b18c693f7 --- /dev/null +++ b/1682/CH2/EX2.4/Exa2_4.sce @@ -0,0 +1,23 @@ +//Exa2.4
+clc;
+clear;
+close;
+//given data for original design
+Tanks=4;//units
+TankDia=5.2;//in meter
+TankRad=TankDia/2;//in meters
+TankHeight=7;//in meters
+HeightDiaRatio=TankHeight/TankDia;//unitless
+VolPerTank=(22/7)*TankRad^2*TankHeight;//in m^3
+//given data for new design
+disp("Cost of old design = 111% of cost of new design(Optimal Design)");
+disp("Optimal Ratio of height to diameter = 4:1 ");
+disp("h:d = 4:1");
+disp("4*d = h");
+disp("r = h/8");
+disp("Since volume remains the same, Volume = (22/7)*(h/8)^2*h");
+h=VolPerTank/(22/7)*64;//in meters
+r=h/8;//in meters
+d=2*r;//in meters
+CostNewDesign=900000*(100/111);//in Rs
+disp(900000-CostNewDesign,"Expected savings by redesign in Rs : ");
\ No newline at end of file diff --git a/1682/CH2/EX2.5/Exa2_5.sce b/1682/CH2/EX2.5/Exa2_5.sce new file mode 100755 index 000000000..f629d39bc --- /dev/null +++ b/1682/CH2/EX2.5/Exa2_5.sce @@ -0,0 +1,18 @@ +//Exa2.5
+clc;
+clear;
+close;
+distance=2500;//in Km
+TransCost=1;//in Rs/Kg/100Km
+//given data for steel window frame
+SteelFramePrice=1000;//in Rs/Unit
+SteelFrameWeight=75;//in Kg/Unit
+TotalCost1=SteelFramePrice+TransCost*SteelFrameWeight*distance/100;//in Rs
+disp(TotalCost1,"Total cost of steel window frame per unit in Rs : ");
+
+//given data for Aluminium window frame
+AlumilniumFramePrice=1500;//in Rs/Unit
+AlumilniumFrameWeight=28;//in Kg/Unit
+TotalCost2=AlumilniumFramePrice+TransCost*AlumilniumFrameWeight*distance/100;//in Rs
+disp(TotalCost2,"Total cost of Alumilnium window frame per unit in Rs : ");
+disp(TotalCost1-TotalCost2,"DECISION : The total cost per unit of the aluminium window frame is less than that of steel window frame. Hence, Alumilnium window frame is recommended. The Economic advantage per unit of the Alumilnium window frame over steel window frame in Rs : ")
\ No newline at end of file diff --git a/1682/CH2/EX2.6/Exa2_6.sce b/1682/CH2/EX2.6/Exa2_6.sce new file mode 100755 index 000000000..4b2b8f2dd --- /dev/null +++ b/1682/CH2/EX2.6/Exa2_6.sce @@ -0,0 +1,33 @@ +//Exa2.6
+clc;
+clear;
+close;
+//Cost of component using process sequence 1
+disp("The process sequence 1 of the component is as follows : Turning - Milling - Shaping - Drilling") ;
+disp("Calculations are summarized in form of table below : ");
+disp("Operation Operation Time Machine Hour rate Cost");
+disp(" No. Min Hour Rs. Rs.");
+disp(" 1 Turning 5 0.083 200 16.60");
+disp(" 2 Milling 8 0.133 400 53.20");
+disp(" 3 Shapiing 10 0.167 350 58.45");
+disp(" 4 Drilling 3 0.050 300 15.00");
+disp(" Total 143.25");
+
+//Cost of component using process sequence 2
+disp("The process sequence 2 of the component is as follows : Turning - Milling - Drilling") ;
+disp("Calculations are summarized in form of table below : ");
+disp("Operation Operation Time Machine Hour rate Cost");
+disp(" No. Min Hour Rs. Rs.");
+disp(" 1 Turning 5 0.083 200 16.60");
+disp(" 2 Milling 14 0.233 400 93.20");
+disp(" 4 Drilling 3 0.050 300 15.00");
+disp(" Total 124.80");
+
+//Cost of component using process sequence 3
+disp("The process sequence 3 of the component is as follows : Only CNC operations") ;
+disp("Calculations are summarized in form of table below : ");
+disp("Operation Operation Time Machine Hour rate Cost");
+disp(" No. Min Hour Rs. Rs.");
+disp(" 1 CNC 8 0.133 1000 133");
+
+disp("The process sequence 2 has the least cost. Therefore, it should be selected for manufacturing the component.")
|