빗물(담수)의 pH 계산 (이산화탄소는 대기와 빗물에서 용해 평형을 이룬다)

Hp = sqrt( K0*K1*pCO2+Kw );
pH = -log( K0*K1*pCO2+Kw )/2;
/* 용존 무기 탄소 (DIC) */

DIC = Hp + K0*pCO2;
H2CO3 = K0*pCO2;
HCO3m = K1*H2CO3/Hp;

print(Hp);
print(pH);
print(DIC);
print(H2CO3);
print(HCO3m);
print(DIC*10^6);
print(H2CO3*10^6);
print(HCO3m*10^6);