summaryrefslogtreecommitdiff
path: root/1379/CH12/EX12.1.5/example12_5.sce
blob: f99f24ae67f600f62826fadb5d4572c7b0b24c50 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15


//example 12.5 
clc; funcprot(0);
// Initialization of Variable
l=25;
pi=3.1428;
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):");