Ero sivun ”Metallimalmin murskausprosessin pölypäästöt” versioiden välillä

Opasnet Suomista
Siirry navigaatioon Siirry hakuun
Rivi 45: Rivi 45:
'''Varsinainen funktio
'''Varsinainen funktio


<rcode name="answer" include="page:OpasnetBaseUtils|name:generic" label="Turha ajaa, yksinään ei tee mitään">
<rcode name="answer" >


################# pölypäästö: funktio pölypäästön laskemiseen
################# pölypäästö: funktio pölypäästön laskemiseen
Rivi 55: Rivi 55:
## C1-Cn = pölypäästöjen vähentämisen tehokkuuskertoimet kullekin käytetylle menetelmälle
## C1-Cn = pölypäästöjen vähentämisen tehokkuuskertoimet kullekin käytetylle menetelmälle


pölypäästö <- function(page, M, A, prosessi, kosteus, vaimennus){
library(OpasnetUtils)
data <- op_baseGetData("opasnet_base", page) # Haetaan päästökerrointiedot
library(xtable)
data <- tidy(data) # Siistitään data


out <- data[data$Suure == "Päästökerroin", c("Kosteus", "Hiukkaskoko", "Prosessi", "Result")] # Valitaan päästökerroinrivit
riippuvuudet <- data.frame(
temp <- data.frame(Kosteus = c("Kuiva", "Kostea"), Kosteus2 = "*")
Name = c("M", "A", "prosessi", "kosteus", "vaimennus")
temp <- merge(out, temp, by.x = "Kosteus", by.y = "Kosteus2")[, -1] # Korvataan villikortit oikeilla arvoilla
)
out <- rbind(out[out$Kosteus != "*", ], temp)
out <- merge(out, data.frame(Kosteus = kosteus, Prosessi = prosessi)) # Rajataan käyttäjän määrittämiin prosesseihin.


if(class(vaimennus)!="list") {vaimennus <- list(vaimennus)}
funktio <- function(dependencies, ...) {
vaim <- 1
pölypäästö <- function(M, A, prosessi, kosteus, vaimennus){
for(i in 1:length(vaimennus)) {
data <- op_baseGetData("opasnet_base", Op_fi2806) # Haetaan päästökerrointiedot
vaim[i] <- exp(sum(log(as.numeric(data[data$Suure == "Läpipääsykerroin" & data$Prosessi %in% vaimennus[[i]], "Result"]))))
data <- tidy(data) # Siistitään data
 
out <- data[data$Suure == "Päästökerroin", c("Kosteus", "Hiukkaskoko", "Prosessi", "Result")] # Valitaan päästökerroinrivit
temp <- data.frame(Kosteus = c("Kuiva", "Kostea"), Kosteus2 = "*")
temp <- merge(out, temp, by.x = "Kosteus", by.y = "Kosteus2")[, -1] # Korvataan villikortit oikeilla arvoilla
out <- rbind(out[out$Kosteus != "*", ], temp)
out <- merge(out, data.frame(Kosteus = kosteus, Prosessi = prosessi)) # Rajataan käyttäjän määrittämiin prosesseihin.
 
if(class(vaimennus)!="list") {vaimennus <- list(vaimennus)}
vaim <- 1
for(i in 1:length(vaimennus)) {
vaim[i] <- exp(sum(log(as.numeric(data[data$Suure == "Läpipääsykerroin" & data$Prosessi %in% vaimennus[[i]], "Result"]))))
}
 
out$Result <- as.numeric(out$Result) * M * A * vaim # Varsinainen laskentakaava
out <- dropall(out) # Tiputetaan turhat levelit
return(out)
}
}
}


out$Result <- as.numeric(out$Result) * M * A * vaim # Varsinainen laskentakaava
MetMalMurskPol <- new("ovariable",
out <- dropall(out) # Tiputetaan turhat levelit
name = "MetMalMurskPol",
return(out)
dependencies = riippuvuudet,
}
formula = funktio
)
 
objects.put(MetMalMurskPol)
</rcode>
</rcode>



Versio 17. heinäkuuta 2012 kello 10.23




Kysymys

Miten lasketaan metallimalmin murskausprosessin pölypäästöt?

Vastaus

Ero sivun ”Metallimalmin murskausprosessin pölypäästöt” versioiden välillä(useita)
ObsSuureYksikköKosteusHiukkaskokoProsessiArvo
1Päästökerroinkg/tonKuivaTSPEsi/karkea murskaus 0.2
2Päästökerroinkg/tonKuivaTSPVälimurskaus 0.6
3Päästökerroinkg/tonKuivaTSPHienomurskaus 1.4
4Päästökerroinkg/tonKuivaTSPMateriaalin siirto ja kuljetus 0.06
5Päästökerroinkg/tonKosteaTSPEsi/karkea murskaus 0.01
6Päästökerroinkg/tonKosteaTSPVälimurskaus 0.03
7Päästökerroinkg/tonKosteaTSPHienomurskaus 0.03
8Päästökerroinkg/tonKosteaTSPMateriaalin siirto ja kuljetus 0.005
9Päästökerroinkg/ton*TSPMärkäseulonta 0
10Päästökerroinkg/ton*TSPKuivaseulonta ilman avulla 14.4
11Päästökerroinkg/ton*TSPKuivaseulonta ilman ilmapuhallusta 1.2
12Päästökerroinkg/ton*TSPKuivaus 9.8
13Päästökerroinkg/tonKuivaPM10Esi/karkea murskaus 0.02
14Päästökerroinkg/tonKuivaPM10Välimurskaus 0 - 0.6
15Päästökerroinkg/tonKuivaPM10Hienomurskaus 0.08
16Päästökerroinkg/tonKuivaPM10Materiaalin siirto ja kuljetus 0.03
17Päästökerroinkg/tonKosteaPM10Esi/karkea murskaus 0.004
18Päästökerroinkg/tonKosteaPM10Välimurskaus 0.012
19Päästökerroinkg/tonKosteaPM10Hienomurskaus 0.01
20Päästökerroinkg/tonKosteaPM10Materiaalin siirto ja kuljetus 0.002
21Päästökerroinkg/ton*PM10Märkäseulonta 0
22Päästökerroinkg/ton*PM10Kuivaseulonta ilman avulla 13
23Päästökerroinkg/ton*PM10Kuivaseulonta ilman ilmapuhallusta 0.16
24Päästökerroinkg/ton*PM10Kuivaus 5.9
25Läpipääsykerroin-**Tuulensuojamuuri0.7
26Läpipääsykerroin-**Materiaalin kastelu0.5
27Läpipääsykerroin-**Kotelointi, sykloni0.35
28Läpipääsykerroin-**Kotelointi, harjaus0.25
29Läpipääsykerroin-**Kotelointi, kangassuodattimet0.17
30Läpipääsykerroin-**suljettu tai maanalainen0
31Läpipääsykerroin-**Sähköstaattinen suodatus0.13 - 0.08

Kaava

Varsinainen funktio

+ Näytä koodi

Esimerkkilaskenta

Kuinka monta tonnia malmia murskataan tunnissa?:

Mitä murskausprosesseja on käytössä?:
Esi/karkea murskaus
Välimurskaus
Hienomurskaus
Materiaalin siirto ja kuljetus
Märkäseulonta
Kuivaseulonta ilman avulla
Kuivaseulonta ilman ilmapuhallusta
Kuivaus

Onko malmi kuivaa vai kosteaa (rajana 1.5 % kosteutta)?:

Mitkä päästönvaimennusprosessit ovat käytössä?:
Tuulensuojamuuri
Materiaalin kastelu
Hihnan kotelointi, sykloni
Hihnan kotelointi, harjaus
Hihnan kotelointi, kangassuodattimet
suljettu tai maanalainen
Sähköstaattinen suodatus

+ Näytä koodi

Perustelut

Katso myös

Minera-malli: Ohjeistusta kaivostoiminnan ympäristö- ja terveysriskien arviointiin.
Osa linkeistä vie ohjeistuksiin eri vaikutusarvioinnin osien tekemisestä, osa taas valmiisiin laskentamalleihin (lihavoitu).
Kaivostoiminta

Kohdekohtaisen arvioinnin esimerkkisivu · Rikastus · Kaivosprosessit

Pölyn ja hiukkasten päästöt

Pöly (ohje) · Lähteet · Pintamaan poisto! · Tarvekivi ! · Louhinta ! · Murskaus · Lastaus ja pudotus · Kuljetuksen pakokaasupäästöt! · Kuljetuksen pölypäästöt! · Työkoneet · Hihnakuljetus · Energiantuotanto · Polttomoottorit! · Sähköntuotanto ! · Boilerit ! · Varastointi · Kaivannaisjäte · Sivukivi · Rikastushiekka

Muut päästöt

Haju · Kaasut · Typpi · Säteily! · Tärinä · Jätevesi · Varastoinnin vesipäästö · Mallinnusohjelmat · Rikastuskemikaalipäästöt · Melu

Pitoisuus ympäristössä

Pohjavesi · Pintavesi · Kulkeutuminen vedessä! · Sedimentit · Sedimentit (mittaukset) · Sedimentit (huokosvedet) · Maaperä! · Maaperän terveysriskinarvio

Ihmiset Ympäristö ja ekologia
Altistuminen

Altistumisen arviointi

Nisäkkäät ja linnut · Kasvit! · Maaselkärangattomat! · Ravinto!

Vaikutus

Terveysriskinarvioinnin rakenne · Riskinarviointiohjeet: · Pohjavesi · Pintavesi · Pöly · Kaasumaiset ilman epäpuhtaudet · Maaperä · Tärinä · Haju · Säteily! · Maaperän terveysriski · Kaasut · Melu · Pienhiukkasvaikutukset! · Terveysriskin kuvaus

Vesistöt · Maaperä · Sedimentti · Ekologinen riskinarviointi: · Ekologisten vaikutusten arviointi · Kohdekohtaisen mallin vaiheet · Alustus · Kohdetutkimukset · Vaikutusten arviointi · Mittauksiin perustuva arvio · Luonnehdinta

Integroitu riskinarvio

Integroitu riskinarvio · Viitearvoja

Muita Minera-projektin tuotoksia
Minera-mallin sovelluksia

· Luikonlahden tapaustutkimus · Luikonlahden sienitutkimusraportti

Muut

· Metallimalmikaivostoiminnan parhaat ympäristökäytännöt · Minera-hanke · MINERA Loppuseminaari · Kauppila T, Makkonen S, Komulainen H, Tuomisto JT: Metallikaivosalueiden ympäristöriskinarviointiosaamisen kehittäminen: MINERA-hankkeen loppuraportti. · Lehdistötiedote 15.4.2013 · Kohdekohtainen esimerkki · Lyhenteet ja määritelmät · Loppuraportti kokonaismalli · Kaivostoiminnan ympäristöterveysriskien arviointi (suojattu sivu) · Mallinnusohjelmat päästöjen arvioinnissa · Viitearvot · Talvivaaran kaivoksen terveysvaikutukset · Loppuraportti · Raportti · Yaran tapaustutkimus

Muita kaivostoimintaan liittyvää

· Vesijalanjälki · Hyvä kaivos pohjoisessa · Yhteiskuntatieteellinen kaivostutkimus Itä-Suomen yliopistossa · Teemasivu:Kaivostoiminnan vaikutusarviointi


Avainsanat

Kaivosteollisuus, mineraali

Viitteet


Aiheeseen liittyviä tiedostoja

<mfanonymousfilelist></mfanonymousfilelist>