公害被害メカニズム
Graphiz dot $ dot -Tpng KouGai-Mechanism-rcrds.dot -oKouGai-Mechanism-rcrds.png
digraph kdm {
labelloc="t"
label="鉱毒被害発生のメカニズム"
/*
KouDoku [shape=none,label=<
<ruby>鉱毒<rp>(</rp><rt>こうどく</rt><rp>)</ruby>
>] */
/*Error: Unknown HTML element <ruby> on line 2
in label of node KouDoku */
{rank=same;
mining [shape=box;style=dotted;label=<
<table border="0" cellborder="0" cellspacing="0" cellpadding="4">
<tr><td bgcolor="lightgrey">採鉱</td></tr>
<tr><td>砒素</td></tr></table>>]
// [label="採鉱\n砒素",shape="box"];
KouDoku [label="鉱毒・公害",shape=ellipse,style=dotted]
smelting [shape=box;style=dotted;label=<
<table border="0" cellborder="0" cellspacing="0" cellpadding="4">
<tr><td bgcolor="lightgrey">製錬</td></tr>
<tr><td>亜ヒ焼き</td></tr></table>>]
//[label="製錬\n亜ヒ焼き",shape="box"];}
}
{rank=same;
minewater [shape=none,label=<
<table border="0" cellborder="0" cellspacing="0" cellpadding="4">
<tr><td port="KouNai">坑内水</td></tr>
<tr><td bgcolor="lightgrey">砒素</td></tr>
</table>>]
smoke [shape="none",label=<
<table border="0" cellborder="0" cellspacing="0" cellpadding="4">
<tr><td port="kemuri">煙</td></tr>
<tr><td bgcolor="lightgrey">亜砒酸粉塵</td></tr>
<tr><td bgcolor="lightgrey">亜硫酸ガス</td></tr>
</table>>]
joint [shape="none",label=<
<table border="0" cellborder="0" cellspacing="0" cellpadding="4">
<tr>
<td port="tailings" rowspan="3">廃石</td>
<td bgcolor="lightgrey">鉛、亜砒、銅</td>
<td port="slag" rowspan="3">鉱滓</td>
</tr>
<tr>
<td port="cadmium" bgcolor="lightgrey">カドミウム</td>
</tr>
<tr>
<td bgcolor="lightgrey">砒素、鉄</td>
</tr>
</table>>]
}
{rank=same;
water [label="水を汚染",shape="none"];
dirt [label="土を汚染",shape="none"];
farm [label="農を汚染",shape="none"];
air [label="大気を汚染",shape="none"];}
damage [shape=none,label=<
<table border="0" cellborder="0" cellspacing="0" cellpadding="4">
<tr>
<td rowspan="2">被<br/>害</td>
<td port="people" colspan="4"
bgcolor="lightgrey">人体被害</td>
<td rowspan="2">被<br/>害</td></tr>
<tr>
<td>川魚</td><td>農作物</td><td>樹木</td><td>家畜</td></tr>
</table>>]
// KouDoku -> { mining; smelting; }
mining -> KouDoku
smelting -> KouDoku
mining -> minewater
smelting -> smoke
mining -> joint:tailings:nw
smelting -> joint:slag:ne
joint -> water [label="川に流入"] // ,weight=8]
minewater -> water
joint -> dirt
subgraph smokedouble {
ordering=out;
smoke -> farm:n // [weight=8]
smoke -> air
}
subgraph mingledPollutions {
ordering=out
water -> dirt [label="用水"]
dirt -> farm:nw // [weight=8]
air -> farm
//smoke:e -> farm:ne // [weight=8]
}
KouDoku -> damage [style=dashed]
water -> damage:people:nw [label="飲む"]
farm -> damage:people:ne [label="食う"]
air -> damage:people:n [label="吸う"]
} //end kdm KouDokuMechanism