{UTF-8}
********************************************************
	.polonium-210
********************************************************~
		Simulation: Peter Bützer
	|

k bio=
	ln(2)/HWZbio
	~	1/Day
	~		|

k eff=
	k phys+k bio
	~	1/Day
	~		|

k phys=
	ln(2)/HWZphys
	~	1/Day [0,?]
	~	Zerfallskonstante
	|

HWZeff=
	ln(2)/k eff
	~	Day
	~		|

zerfallen=
	k phys*"Polonium-210"
	~	ng/Day
	~		|

HWZbio=
	40
	~	Day [30,50,1]
	~	Biologische Halbwertszeit von Po-210
	|

eliminieren=
	k bio*"Polonium-210"
	~	ng/Day
	~		|

bestrahlen ing=
	Deq Ing*Zerfallsrate/Zeitumrechnung
	~	Sv/Day
	~	Wirksame Zerfälle bei Ingestion im Körper
	|

bestrahlen inh=
	Deq inh*Zerfallsrate/Zeitumrechnung
	~	Sv/Day
	~	Wirksame Zerfälle bei Inhalation im Körper
	|

Deq Ing=
	2.4e-007
	~	Sv/(Zerfälle/Second) [5.1e-007,5.1e-007]
	~	Sv pro Bq: Dosisaequivalent bei Ingestion; Po-210, \
		Strahlenschutzverordnung (StSV) vom 22. Juni 1994 (Stand am 12. Juli \
		2005), 814.501, Anhang 3, S.84
	|

Deq inh=
	2.2e-006
	~	Sv/(Zerfälle/Second) [2.5e-006,2.5e-006]
	~	Sv pro Bq: Dosisaequivalent bei Inhalation; Po-210, \
		Strahlenschutzverordnung (StSV) vom 22. Juni 1994 (Stand am 12. Juli \
		2005), 814.501, Anhang 3, S.84
	|

Dosis ing= INTEG (
	bestrahlen ing,
		0)
	~	Sv [0,?]
	~	Dosis bei Ingestion
	|

Dosis inh= INTEG (
	bestrahlen inh,
		0)
	~	Sv [0,?]
	~	Dosis bei Inhalation
	|

HWZphys=
	138.376*1
	~	Day [0,?]
	~	Physikalische Halbwertszeit von Po-210
	|

Po elim= INTEG (
	eliminieren,
		0)
	~	ng
	~	Polonium biologisch eliminiert, ca. 90% mit Kot, 10% mit Urin
	|

Po zerf= INTEG (
	zerfallen,
		0)
	~	ng
	~	Polonium-210 physikalisch zu stabilem Blei-206 zerfallen
	|

"Polonium-210"= INTEG (
	-eliminieren-zerfallen,
		Startmenge)
	~	ng
	~	Aufgenommenes Polonium
	|

spez Aktivität=
	185000
	~	Zerfälle/Second/ng [1.66e+008,1.66e+008]
	~	Bq = Zerfälle/Second; 1 mg Po-210 hat dieselbe Aktivität wie 5 g Ra-226 \
		' 1 mg haben 5*3.7e10 Bq = 1.85e11 Bq
	|

Startmenge=
	100
	~	ng [0,200]
	~		|

Zeitumrechnung=
	24*60*60
	~	Day
	~	Die Zerfälle sind in Bq (Zerfälle pro Sekunde gerechnet). Die Zeitachse \
		der Grafik ist aber in Tagen, somit muss diese umgerechnet werden.
	|

Zerfallsrate=
	"Polonium-210"*spez Aktivität
	~	Zerfälle/Second [0,?]
	~	Einheit: Bq = Zerfälle/Second
	|

********************************************************
	.Control
********************************************************~
		Simulation Control Parameters
	|

FINAL TIME  = 360
	~	Day
	~	The final time for the simulation.
	|

INITIAL TIME  = 0
	~	Day
	~	The initial time for the simulation.
	|

SAVEPER  = 
        TIME STEP 
	~	Day [0,?]
	~	The frequency with which output is stored.
	|

TIME STEP  = 1
	~	Day [0,?]
	~	The time step for the simulation.
	|

\\\---/// Sketch information - do not modify anything except names
V300  Do not put anything below this section - it will be ignored
*View 1
$192-192-192,0,Times New Roman|12||0-0-0|0-0-0|0-0-255|-1--1--1|-1--1--1|120,120,100,0
10,1,"Polonium-210",295,382,63,27,3,131,0,4,0,0,0,0,0-0-0,128-192-0,|0||0-0-0
1,2,3,1,100,0,0,22,0,0,0,-1--1--1,,1|(383,384)|
11,3,300,414,384,6,8,34,3,0,0,1,0,0,0
10,4,zerfallen,414,404,37,12,40,3,0,0,-1,0,0,0
1,5,6,1,100,0,0,22,0,0,0,-1--1--1,,1|(301,441)|
11,6,284,301,480,8,6,33,3,0,0,4,0,0,0
10,7,eliminieren,356,480,47,12,40,3,0,0,-1,0,0,0
10,8,HWZphys,301,284,42,12,8,3,0,0,0,0,0,0
10,9,HWZbio,469,581,37,12,8,3,0,0,0,0,0,0
1,10,1,6,1,0,0,0,0,64,0,-1--1--1,,1|(376,444)|
1,11,1,3,1,0,0,0,0,64,0,-1--1--1,,1|(339,347)|
10,12,HWZeff,571,463,34,12,8,3,0,0,0,0,0,0
10,13,Deq inh,71,25,33,12,8,3,0,0,0,0,0,0
10,14,Deq Ing,81,119,33,12,8,3,0,0,0,0,0,0
10,15,spez Aktivität,146,360,57,12,8,3,0,0,0,0,0,0
10,16,Po zerf,539,383,40,20,3,3,0,4,0,0,0,0,0-0-0,255-192-128,|0||0-0-0
10,17,Po elim,303,580,40,20,3,3,0,4,0,0,0,0,0-0-0,192-255-255,|0||0-0-0
1,18,6,17,4,0,0,22,0,0,0,-1--1--1,,1|(301,523)|
1,19,3,16,4,0,0,22,0,0,0,-1--1--1,,1|(459,384)|
10,20,Startmenge,239,227,46,12,8,3,0,0,0,0,0,0
10,21,Zerfallsrate,103,275,59,15,8,131,0,0,0,0,0,0
1,22,1,21,1,0,0,0,0,64,0,-1--1--1,,1|(208,281)|
1,23,15,21,1,0,0,0,0,64,0,-1--1--1,,1|(158,323)|
10,24,Dosis inh,264,62,44,21,3,131,0,4,0,0,0,0,0-0-0,255-128-192,|0||0-0-0
12,25,48,67,64,10,8,0,3,0,0,-1,0,0,0
1,26,28,24,4,0,0,22,0,0,0,-1--1--1,,1|(187,64)|
1,27,28,25,100,0,0,22,0,0,0,-1--1--1,,1|(109,64)|
11,28,48,148,64,6,8,34,3,0,0,1,0,0,0
10,29,bestrahlen inh,148,86,59,14,40,131,0,0,-1,0,0,0
1,30,21,28,1,0,0,0,0,64,0,-1--1--1,,1|(86,150)|
1,31,13,28,1,0,0,0,0,64,0,-1--1--1,,1|(132,36)|
10,32,Dosis ing,267,171,45,20,3,131,0,4,0,0,0,0,0-0-0,192-192-192,|0||0-0-0
12,33,48,57,169,10,8,0,3,0,0,-1,0,0,0
1,34,36,32,4,0,0,22,0,0,0,-1--1--1,,1|(189,168)|
1,35,36,33,100,0,0,22,0,0,0,-1--1--1,,1|(106,168)|
11,36,48,151,168,6,8,34,3,0,0,1,0,0,0
10,37,bestrahlen ing,151,188,57,12,40,3,0,0,-1,0,0,0
1,38,14,36,1,0,0,0,0,64,0,-1--1--1,,1|(142,132)|
1,39,21,36,1,0,0,0,0,64,0,-1--1--1,,1|(113,212)|
10,40,Zeitumrechnung,293,122,72,22,8,131,0,0,0,0,0,0
1,41,40,28,1,0,0,0,0,64,0,-1--1--1,,1|(179,107)|
1,42,40,36,1,0,0,0,0,64,0,-1--1--1,,1|(184,135)|
10,43,k phys,410,306,27,12,8,3,0,0,0,0,0,0
10,44,k bio,382,522,22,12,8,3,0,0,0,0,0,0
1,45,44,6,1,0,0,0,0,64,0,-1--1--1,,1|(341,518)|
1,46,8,43,1,0,0,0,0,64,0,-1--1--1,,1|(354,257)|
1,47,43,3,1,0,0,0,0,64,0,-1--1--1,,1|(440,341)|
10,48,k eff,481,463,20,12,8,3,0,0,0,0,0,0
1,49,43,48,1,0,0,0,0,64,0,-1--1--1,,1|(478,353)|
1,50,44,48,1,0,0,0,0,64,0,-1--1--1,,1|(463,487)|
1,51,48,12,1,0,0,0,0,64,0,-1--1--1,,1|(516,442)|
1,52,9,44,1,0,0,0,0,64,0,-1--1--1,,1|(456,553)|
12,53,0,903,210,298,197,3,188,0,0,1,0,0,0
Elimination
1,54,20,1,0,0,0,0,0,64,1,-1--1--1,,1|(261,290)|
12,55,0,905,604,295,181,3,188,0,0,1,0,0,0
Bestrahlung
///---\\\
:GRAPH Elimination
:TITLE Elimination
:X-AXIS Time
:SCALE
:VAR Po zerf
:LINE-WIDTH 2
:VAR Po elim
:LINE-WIDTH 2

:GRAPH Bestrahlung
:TITLE Dosis
:X-AXIS Time
:SCALE
:VAR Dosis ing
:LINE-WIDTH 2
:VAR Dosis inh
:LINE-WIDTH 2
:L<%^E!@
1:Current.vdf
9:Current
23:0
15:0,0,0,0,0,0
19:100,0
27:2,
34:0,
4:Time
5:spez Aktivität
24:0
25:360
26:360