Ero sivun ”Klooraus” versioiden välillä

Opasnet Suomista

Siirry navigaatioon Siirry hakuun

Versio 29. kesäkuuta 2012 kello 10.51

Tämä sivu on tietokide alatyypiltään muuttuja. Sivutunniste: Op_fi2667
Moderaattori:Päivi Meriläinen (katso kaikki) Sivun edistymistä ei ole arvioitu. Arvostuksen määrää ei ole arvioitu (ks. peer review).
Lisää dataa {{#opasnet_base_link:Op_fi2667}}

Rajaus

Kloorauksen vaikutus juomaveden patogeenien pitoisuuteen, eli mikrobiologinen poistotehokkuus.

Määritelmä

Kloorauksen tehokkuus eli sen kyky tuhota mikrobeja riippuu monesta tekijästä: kloorin muodosta, lämpötilasta, viipymästä, pH:sta ja konsentraatiosta sekä vedessä olevista muista aineista. Klooraus saattaa tehokkaasti tappaa tietyissä olosuhteissa indikaattoriorganismit, mutta veteen saattaa kuitenkin jäädä aktiivisia viruksia ja alkueläimiä tai niiden kystoja.Kloorauksen tehokkuuden mittarina käytetään kloorikokemaa eli pitoisuuden ja viipymän tuloa, ns. CT-arvoa. Vaadittava CT-arvo riippuu lämpötilasta: mitä matalampi lämpötila, sen suurempi CT-arvo tarvitaan.

Data

--#: Tässä jää epäselväksi, mitä ovat CT1..CT5: eri lämpötiloissa havaittavia CT-arvoja? Millä perusteella tiedetään, mitä niistä käytetään laskennassa? --Jouni Tuomisto 28. kesäkuuta 2012 kello 23.08 (EEST)

--#: Analyticassa oli joku eriskummallinen funktio, jonka käänsin suoraan R:ään. Se on tuossa alla olevassa koodissa määritelty 'CLMysteeri' nimellä. Se ei ole mitenkään suoraviivainen funktio, eikä tällä sivulla kuvailtu määritelmä mielestäni ole kovin osuva. --Teemu R 29. kesäkuuta 2012 kello 10.42 (EEST)

⇤#: 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. --Jouni Tuomisto 28. kesäkuuta 2012 kello 23.08 (EEST)

Patogeenien herkkyys kloorille:

Ero sivun ”Klooraus” versioiden välillä((mg/l)*min)
Obs	Patogeeni	Ct 1 Log vähenemä	Ct 2 Log Vähenemä	Ct 3 Log vähenemä	Ct 4 Log vähenemä	Ct 5 Log vähenemä
1	Kampylobakteeri	0.152	0.294	0.436	0	0
2	E.coli O157:H7	0.17	0.34	0.52	1.06	0
3	Rotavirus	0.12	0.16	0.2	0.3	0
4	Norovirus	0.09	0.18	0.245	0.314	0
5	Cryptosporidium	0	0	0	0	0
6	Giardia	75	150	216	0	0

Patogeeni	Viite
Kampylobakteeri	^[2]; ^[3]
E.coli O157:H7	^[4]; ^[5]
Rotavirus	^[6]
Norovirus	^[7]
Cryptosporidium	^[8]
Giardia	^[9]

Kausaliteetti

Yksikkö

logaritminen vähenemä

Kaava

CT-arvo = Kloorin jäännöspitoisuus (mg/l)* aika (min)

Tulokset

Patogeeni	Log-vähenemä
Campylobacter	8.837981871
E.coli O157:H7	7.182699561
Rotavirus	11.97117474
Norovirus	13.55252482
Cryptosporidium	0
Giardia	0.095329311

RCode

+ Näytä koodi - Piilota koodi

#default arvon alustus
	library(OpasnetUtils)


	kloori = data.frame(Kloori = 1.5)
	Kloori = new("ovariable",name = "Kloori",output = kloori)
	objects.put(Kloori)
       cat("Muuttuja alustettu. Kopioi sivun osoitteen avain talteen käyttöä varten.\n")

+ Näytä koodi - Piilota koodi


library(OpasnetUtils)
library(xtable)
riippuvuudet = data.frame(
	Name = c("Kloori"),
	Key = c("13zG0DdXMB7uTh7a")
)
	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}
		out

}
funktio = function(dependencies){
	ComputeDepencies(dependencies)
	
	}
cat("En ole bugittanut.\n")
	if(Kloori@output[,"Kloori"] == 0) KlooriAnnos <- 0 else KlooriAnnos <- Kloori@output[,"Kloori"]
	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)
	cat("En ole bugittanut.\n")
	KlooriAnnos  <- KlooriAnnos * exp(-0.13 * Times)
	KlooriAnnos  <- KlooriAnnos  * Times.inc
	KlooriAnnosCumsum <- cumsum(KlooriAnnos )
	ClConcDistr <- mean(sample(KlooriAnnosCumsum, 10000, TRUE, Probability))
	CLsensitivityPat <- data.frame(Clcredits = rep(1:5, each = 6), Pathogen, CLsensitivity = c(0.152,0.17,0.12,0.09,0,75,0.294,0.34,0.16,0.18,0,150,0.436,
		0.52,0.2,0.245,0,216,0,1.06,0.3,0.314,0,0,0,0,0,0,0,0)) # log reductions for different "credits"
	CLVahennys <- NA
	for (i in 1:length(levels(CLsensitivityPat$Pathogen))) {
		CLVahennys[i] <- CLMysteeri(ClConcDistr, CLsensitivityPat[CLsensitivityPat$Pathogen == Pathogen[i], "CLsensitivity"]) # epärobustia koodia
	}
	CLVahennys <- data.frame(Pathogen, CLVahennys)
}
cat("En ole bugittanut.\n")
	Klooraus <- new("ovariable",
	name         = "Klooraus",
	dependencies = riippuvuudet,
        formula      = funktio)
	
	objects.put(Klooraus)
	cat("Muuttuja alustettu. Kopioi sivun osoitteen avain talteen käyttöä varten.\n")
	print(xtable(EvalOutput(Klooraus,substitute = TRUE)@output),type = "html")

Katso myös

Viitteet

↑ 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

Aiheeseen liittyviä tiedostoja

<mfanonymousfilelist></mfanonymousfilelist>

Noudettu kohteesta ”https://fi.opasnet.org/index.php?title=Klooraus&oldid=13611”