summaryrefslogtreecommitdiff
path: root/2966/CH1/EX1.1.84/1_1_84.sce
blob: 464776870325a7af922214b734d1015992b495ce (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//water//
//page 1.84 example 1//
clc
W1=32.4;//Ca(HCO3)2 in water in mg/L//
W2=29.2;//Mg(HCO3)2 in water in mg/L//
W3=13.6;//CaSO4 in water in mg/L//
M1=100/162;//multiplication factor of Ca(HCO3)2//
M2=100/146;//multiplication factor of Mg(HCO3)2//
M3=100/136;//multiplication factor of CaSO4//
P1=W1*M1;//Ca(HCO3)2 in terms of CaCO3//
P2=W2*M2;//Mg(HCO3)2 in terms of CaCO3//
P3=W3*M3;//CaSO4  in terms of CaCO3//
T=P1+P2;
printf("\nTemporary hardness is %.0f ppm",T);
P=P3;
printf("\nPermanant hardness is %.0f ppm",P);
To=T+P;
printf("\nTotal hardness is %.0f ppm",To);