|
|
| Line 39: |
Line 39: |
|
| |
|
| === Data === | | === Data === |
|
| |
| Function Log credits by inactivation (Log_credits_by_inac1) in the model [[:Tiedosto:Vesiopas.ANA]]:
| |
| * Parametrit (ct,sensitivity), jossa
| |
| **ct is Ct distribution (Ct_distribution1), which is the distribution of CT_values)
| |
| ** sensitivity on Chlorine sensitivity by pathogen, the table on this page
| |
|
| |
| <pre>
| |
| Var Lr:=0;
| |
| Var ct1:= sensitivity[@Ct_for_log_reduction=1];
| |
| Var ct2:sensitivity[@Ct_for_log_reduction=2];
| |
| Var ct3:=sensitivity[@Ct_for_log_reduction=3];
| |
| Var ct4:=sensitivity[@Ct_for_log_reduction=4];
| |
| Var ct5:=sensitivity[@Ct_for_log_reduction=5];
| |
| Lr:=if ct < ct1 and ct1>0 then ct *(1/ ct1) else Lr;
| |
| Lr:=If ct >=ct1 and ct1>0 then (1+(ct-ct1)*(1/(ct2-ct1))) else Lr;
| |
| Lr:=If ct >=ct2 and ct2>0 then (2+(ct-ct2)*(1/(ct3-ct2))) else Lr;
| |
| Lr:=If ct >=ct3 and ct3>0 then (3+(ct-ct3)*(1/(ct4-ct3))) else Lr;
| |
| Lr:=If ct >=ct3 and ct3>0 and ct4=0 then (3+(ct-ct3)*(1/(ct3-ct2))) else Lr;
| |
| Lr:=If ct >=ct4 and ct4>0 then (4+(ct-ct4)*(1/(ct5-ct4))) else Lr;
| |
| Lr:=If ct >=ct4 and ct4>0 and ct5=0 then (4+(ct-ct4)*(1/(ct4-ct3))) else Lr;
| |
| Lr:=If ct >=ct5 and ct5>0 then 5 else Lr;
| |
| Lr
| |
| </pre>
| |
|
| |
| Nähdäkseni funktio käy läpi kullekin patogeenille taulukon arvot CT1:stä CT5:een niin kauan, kunnes tulee nolla vastaan. Eli laskennassa käytetään ainoastaan viimeistä ehdot täyttävää yhtälöä. Jos taulukossa olevan luvun tulkinta on tämä: "CT-arvo, joka aiheuttaa 1/2/jne logaritmisen vähenemän patogeenipitoituudessa", niin silloin tässä olisi järkeä. Ensimmäinen yhtälö laskee, minkä osuuden 10-kertaisesta vähenemästä ct saa aikaan; toinen yhtälö laskee sen osuuden CT-arvosta, joka jää vielä yli ja katsoo, millaisen lisävähenemän sillä saa aikaan jne. Lopputuloksena on Log reduction by Proposed method.
| |
|
| |
|
| |
| {{vastusta_pätemätön|#: |Yksikkö pitäisi olla standardimuodossa (ks. [[:op_en:Unit conversions]]) eli "mg /l min". Kuitenkin tulee mieleen, että eikös tämä ole tietyn klooriannoksen teho eli esim. 0.152 silloin, kun 1 mg/l pitoisuutta käytetään 1 min ajan. Silloinhan yksikön pitäisi olla 1/(mg/l min) eli standardimuodossa kirjoitettuna l /mg /min.|--[[Käyttäjä:Jouni|Jouni Tuomisto]] 28. kesäkuuta 2012 kello 23.08 (EEST)}}
| |
| : {{vastusta|#: |Oikea yksikkö on "mg /l min", koska arvot ovat CT-arvoja annetulla vähenemällä (ks. pohdinta yllä). |--[[Käyttäjä:Jouni|Jouni Tuomisto]] 1. heinäkuuta 2012 kello 16.31 (EEST)}}
| |
|
| |
|
| Pathogen sensitivity to chlorine: | | Pathogen sensitivity to chlorine: |
Revision as of 06:15, 6 July 2019
Question
How does chlorination affect the concentrations of pathogens in drinking water, reported in log-decrese?
Answer
| Pathogen
|
Log-dercease
|
| Campylobacter
|
8.837981871
|
| E.coli O157:H7
|
7.182699561
|
| Rotavirus
|
11.97117474
|
| Norovirus
|
13.55252482
|
| Cryptosporidium
|
0
|
| Giardia
|
0.095329311
|
Rationale
Chloriantion efficiency, or chlorine's capacity to destroy microbes, depends on many factors: the form of the chlorine, temperature, retention period, pH and concentration as well as other chemicals in the water. In some circumstances it might efficiently kill all indicator organisms, but some active viruses, protists or their cysts may remain in the water. The meter to measure the efficiency of chlorination is kloorikokema ⇤--arg5411: . Someone else has to translate this --Heta (talk) 14:31, 4 July 2019 (UTC) (type: truth; paradigms: science: attack), which is the concentration multiplied by retention period, so called CT-value. The required CT-value depends on the temperature: the lower the temperature, the higher the CT-value has to be.
[1]
Data
Pathogen sensitivity to chlorine:
| Pathogen
|
Reference
|
| Campylobacter
|
[2]; [3]
|
| E.coli O157:H7
|
[4]; [5]
|
| Rotavirus
|
[6]
|
| Norovirus
|
[7]
|
| Cryptosporidium
|
[8]
|
| Giardia
|
[9]
|
Causality
Unit
logarithmic decrease
Calculations
CT-value = Chlorine residue concentration (mg/l)* time (min)
+ Show code- Hide code
# This is code "Op_en7956/efficiency" on page [[Drinking water chlorination efficiency]]
library(OpasnetUtils)
library(reshape2)
riippuvuudet = data.frame(
Name = c("ChlorineDose", "CLMysteeri", "CLsensitivity", "ChlorineEfficiencyF"),
Ident = c("Op_fi2667/dose")
)
CLMysteeri <- function(ct, sens) { # jotakin mysteeristä
out <- NA
if (sum(sens) == 0) out <- 0
if (ct < sens[1] & sens[1] > 0) {out <- ct * (1 / sens[1])}
if (ct >= sens[1] & sens[1] > 0) {out <- 1 + (ct - sens[1]) * (1 / (sens[2] - sens[1]))}
if (ct >= sens[2] & sens[2] > 0) {out <- 2 + (ct - sens[2]) * (1 / (sens[3] - sens[2]))}
if (ct >= sens[3] & sens[3] > 0 & sens[4] > 0) {out <- 3 + (ct - sens[3]) * (1 / (sens[4] - sens[3]))}
if (ct >= sens[3] & sens[3] > 0 & sens[4] == 0) {out <- 3 + (ct - sens[3]) * (1 / (sens[3] - sens[2]))}
if (ct >= sens[4] & sens[4] > 0 & sens[5] > 0) {out <- 4 + (ct - sens[4]) * (1 / (sens[5] - sens[4]))}
if (ct >= sens[4] & sens[4] > 0 & sens[5] == 0) {out <- 4 + (ct - sens[4]) * (1 / (sens[4] - sens[3]))}
if (ct >= sens[5] & sens[5] > 0) {out <- 5}
return(out)
}
CLsensitivity <- tidy(
opbase.data("Op_fi2667"),
objname = "CLsensitivity",
)
CLsensitivity <- CLsensitivity <- reshape(CLsensitivity, idvar = "Pathogen", timevar = "Ct value", v.names = "CLsensitivityResult", direction = "wide")
colnames(CLsensitivity) <- gsub("^CLsensitivityResult.", "", colnames(CLsensitivity))
CLsensitivity <- Ovariable("CLsensitivity", output = CLsensitivity, marginal = c(TRUE, FALSE, FALSE, FALSE, FALSE, FALSE))
ChlorineEfficiencyF <- function(ChlorineDose, Ctarvot) {
Mrt <- 12
Ncstr <- 6
Ttimes <- c(0.001,0.01,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9,1,1.1,1.2,1.3,1.4,1.5,1.6,2,2.5,4)
Times <- Ttimes * Mrt
Times.inc <- Times - c(0,Times[1:20])
Probability <- (Times^(Ncstr - 1) * exp(-Ncstr * Times / Mrt))/(factorial(Ncstr - 1) * (Mrt / Ncstr) ^ Ncstr)
ChlorineDose <- ChlorineDose * exp(-0.13 * Times)
ChlorineDose <- KChlorineDose * Times.inc
ChlorineDoseCumsum <- cumsum(ChlorineDose)
ClConcDistr <- sum(ChlorineDoseCumsum * Probability) / length(Probability)
temp <- CLMysteeri(ClConcDistr, Ctarvot)
return(temp)
}
funktio = function(...){
temp <- merge(ChlorineDose@output, CLsensitivity@output)
for (j in 1:nrow(temp)) {
temp$Result[j] <- ChlorineEfficiencyF(
temp$ChlorineDoseResult[j],
unlist(temp[j, paste("Ct", 1:5, "Log decrease")])
)
}
temp$TreatmentMethod <- "Chlorination"
# By returning as ovariable marginals can be manually defined
temp <- Ovariable(output = temp, marginal = colnames(temp) %in% c("TreatmentMethod", "Pathogen", "ChlorineDoseSource"))
return(temp)
}
ChlorineEfficiency <- Ovariable("ChlorineEfficiency", dependencies = riippuvuudet, formula = funktio)
objects.store(ChlorineEfficiency, ChlorineEfficiencyF, CLMysteeri, CLsensitivity)
oprint(ChlorineEfficiency)
| |
See also
References
- ↑ Valve, M ja Isomäki, E. 2007. Klooraus - Tuttu ja turvallinen? Vesitalous 4/2007.
- ↑ Blaser, M. J., Smith, P. F., Wang, W.‐L. L. and Hoff, J. C. (1986). "Inactivation of Campylobacter jejuni by Chlorine and Monochloramine." Applied and Environmental Microbiology 51(2): 307‐311.
- ↑ Lund, V. (1996). "Evaluation of E. coli as an indicator for the presence of Campylobacter jejuni and Yersinia enterocolitica in chlorinated and untreated oligotrophic lake water." Water Research 30(6): 1528‐ 1534.
- ↑ Blaser, M. J., Smith, P. F., Wang, W.‐L. L. and Hoff, J. C. (1986). "Inactivation of Campylobacter jejuni by Chlorine and Monochloramine." Applied and Environmental Microbiology 51(2): 307‐311.
- ↑ Lund, V. (1996). "Evaluation of E. coli as an indicator for the presence of Campylobacter jejuni and Yersinia enterocolitica in chlorinated and untreated oligotrophic lake water." Water Research 30(6): 1528‐ 1534.
- ↑ Rice, E. W., Hoff, J. C. and III, F. W. S. (1982). "Inactivation of Giardia cysts by chlorine." Applied and Environmental Microbiology 43(1): 250‐251
- ↑ Keswick, B. H., Satterwhite, T. K., Johnson, P. C., DuPont, H. L., Secor, S. L., Bitsura, J. A., Gary, G. W. and Hoff, J. C. (1985). Inactivation of norwalk virus in drinking water by chlorine. Applied and Environmental Microbiology 50(2): 261-264.
- ↑ Benito Corona-Vasquez, Amy Samuelson, Jason L. Rennecker and Benito J. Mariñas (2002): Inactivation of Cryptosporidium parvum oocysts with ozone and free chlorine. Water Research 36, 4053-4063
- ↑ Rice, E. W., Hoff, J. C. and III, F. W. S. (1982). "Inactivation of Giardia cysts by chlorine." Applied and Environmental Microbiology 43(1): 250‐251
|
|
