SC15
clear D = input ( " Hole Diameter (mm)= " ) H = D / 10 printf ( " \n Bench hight=%.2f " ,H ) ; B = 35 * D / 1000 printf ( " \n Burden = %.2f " ,B ) ; S = 1.15 * 30 * D / 1000 printf ( " \n Spacing = %.2f " ,S ) ; SD = 10 * D / 1000 printf ( " \n Subdrill = %.2f " ,SD ) ; LC = 20 * D / 1000 printf ( " \n Charge length = %.2f " ,LC ) ; T = 20 * D / 1000 printf ( " \n stemming = %.2f " ,T ) ; BTR = ( H / B ) * 1000 printf ( " /n Bueden stiffness ratio= %.2f " ,BTR ) ; SMS = D / 10 printf ( " \n Stemming material=%.2f " ,SMS ) ; L = H + SD printf ( " \n Hole length = %.2f " ,L ) ; C = L - T printf ( " \n Charge length = %.2f " ,C ) ; N = input ( " Num of holes in a blast = " ) V = B * S * H * N printf ( " \n Blast volume = %.2f " ,V ) ; Den = input ( " Density of rock (t/m^3)= " ) BT = V * De...
