summaryrefslogtreecommitdiff
path: root/1394/CH15/EX15.4.1/Ex15_4_1.sce
blob: 734245cb52e33132b8a86f1a66ea3cf6079ec5bd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

clc
//intialization of variables
tB1 = 38 // days , breakthrough time
tE1 = 46 // days, exhaustion time
c = 2 // number of times flow doubled
//Calculations
theta1 = 2*tB1/(tB1+tE1)// in the first case
ratio1 = 1-theta1 // ratio of unused bed length to total bed length
ratio2 = ratio1*c
tB2 = ((1/c)*(tB1 + 0.5*(tE1-tB1)))*ratio2//breakthrough time for second case
tE2 = (c-ratio2)*tB2/ratio2//exhaustion time for second case
//Results
//answwer slightly wrong in textbook
printf("The breakthrough time for this case is %.1f days",tB2)