summaryrefslogtreecommitdiff
path: root/1379/CH12/EX12.1.5/example12_5.sce
blob: 0a57d1e5f5bda11ac7e9ab832720e29bf999a0f1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//example 12.5 
clc; funcprot(0);
// Initialization of Variables
l=25;
 g = 9.81;
pi=%pi;
rhos=2690;//density of ore
emin=0.6;
emax=0.8;
//calculation
Pmax=rhos*(1-emin)*g*l;
disp(Pmax,"The maximum pressure drop in (N/m^2):");
Pmin=rhos*(1-emax)*g*l;
disp(Pmin,"The minimum pressure drop in (N/m^2):");