{UTF-8}
********************************************************
	.eisen puls
********************************************************~
		Simulation: Peter Bützer
	|

Ende=
	60
	~	Day [0,360]
	~		|

aufnehmen=
	PULSE TRAIN(Start, Dauer , Wiederholungszeit , Ende )*ka Tablette+ka Nahrung*Dosis
	~	mg/Day [0,?]
	~		|

ka Tablette=
	100
	~	mg/Day [0,500]
	~		|

Wiederholungszeit=
	1
	~	Day [0,30,0.5]
	~		|

Dauer=
	30
	~	Day [0,360]
	~		|

Start=
	30
	~	Day [0,?]
	~		|

freisetzen=
	kf*mg Speicher
	~	mg/Day [0,?]
	~		|

Aufnahme Faktor=
	IF THEN ELSE("Serum-Ferritin"/(mg Plasma+0.15)>4, 4, "Serum-Ferritin"/(mg Plasma+0.15\
		) )
	~	Dmnl [0,4]
	~	Unterhalb 0.03 mg/L Fe im Blut wird das Eisen besser aufgenommen
	|

ausscheiden=
	kr*(1-Bioverfügbarkeit*Aufnahme Faktor)*mg Verdauungstrakt
	~	mg/Day [0,?]
	~		|

ku=
	ln(2)/HWZu
	~	1/Day [0,?]
	~		|

mg Blut= INTEG (
	+resorbieren-eliminieren-speichern-umwandeln+freisetzen,
		0)
	~	mg [0,?]
	~		|

mg Plasma= INTEG (
	-umwandeln,
		0)
	~	mg
	~		|

kf=
	0.23
	~	1/Day [0.001,0.4]
	~	Die Freisetzung von Fe aus der Leber hat eine HWZ von ca. 72 Std.
	|

mg Verdauungstrakt= INTEG (
	aufnehmen-ausscheiden-resorbieren,
		0)
	~	mg
	~		|

HWZu=
	0.0694
	~	Day [0,0.1]
	~	HWZ von Plasma Fe wurde zu 100 Minuten bestimmt (Lang, S.63) --> 100/(24 x \
		60) = 0.0694 Tage
	|

"Serum-Ferritin"=
	0.235*5
	~	mg [0,235]
	~	Serum-Ferritin normal 30 - 235 Mikrogramm pro Liter, Annahme: 5 Liter \
		Blut: Faktor 5
	|

speichern=
	ks*mg Blut
	~	mg/Day [0,?]
	~	Das Depoteisen macht ca. 20% aus.
	|

umwandeln=
	ku*mg Plasma-0.00143*ku*mg Blut
	~	mg/Day [0,?]
	~	Im Plasma hat es ca. 4 mg Fe, im Blut ca 2800 mg
	|

mg Speicher= INTEG (
	+speichern-freisetzen,
		0)
	~	mg
	~		|

resorbieren=
	kr*(Bioverfügbarkeit*Aufnahme Faktor)*mg Verdauungstrakt
	~	mg/Day [0,?]
	~		|

Bioverfügbarkeit=
	0.1
	~	Dmnl [0,0.4]
	~	Mittlere Eisenaufnahme im Darm: 10%; maximal 40%
	|

Dosis=
	18
	~	mg [0,100]
	~		|

eliminieren=
	ke*mg Blut
	~	mg/Day [0,?]
	~		|

HWZe=
	568
	~	Day [0,600]
	~	Konrad Lang, S.65 (mit Fe-59 bestimmt)
	|

ka Nahrung=
	4
	~	1/Day [0,10]
	~	Aufnahmegeschwindigkeit pro Tag, hängt von der zugeführten Menge ab
	|

ke=
	ln(2)/HWZe
	~	1/Day [0,?]
	~		|

kr=
	6
	~	1/Day [4,8]
	~	Aufnahme HWZ  ca. 2 - 4 Stunden = 2/24 bis 4/24 Tage -->  kr=ln(2)/HWZ
	|

ks=
	0.04
	~	1/Day [0.001,0.06]
	~	Der Speicher braucht bei 100 mg Fe-Zufuhr/Tag ca. 90 Tage, bis er vom Blut \
		aufgefüllt ist, nachdem das Blut Normalwerte erreicht hat. Das wird mit \
		ks=0.04 etwa erreicht. Der Speicher hat dann mit derselben Zufuhr ca. 1/5 \
		der Eisenmenge vom Blut.
	|

********************************************************
	.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,mg Verdauungstrakt,408,243,73,31,3,131,0,36,0,0,0,0,0-0-0,255-192-128,Helvetica|12||0-0-0
10,2,mg Blut,650,241,45,28,3,131,0,36,0,0,0,0,0-0-0,255-0-0,Helvetica|12||0-0-0
10,3,mg Speicher,653,101,46,29,3,131,0,36,0,0,0,0,0-0-0,255-128-192,Helvetica|12||0-0-0
12,4,48,188,234,10,8,0,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,5,7,1,4,0,0,22,0,0,0,-1--1--1,,1|(303,234)|
1,6,7,4,100,0,0,22,0,0,0,-1--1--1,,1|(229,234)|
11,7,48,266,234,6,8,34,3,0,0,1,0,0,0
10,8,aufnehmen,266,255,50,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,9,11,2,4,0,0,22,0,0,0,-1--1--1,,1|(574,241)|
1,10,11,1,100,0,0,22,0,0,0,-1--1--1,,1|(506,241)|
11,11,172,537,241,6,8,34,3,0,0,1,0,0,0
10,12,resorbieren,537,262,52,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
12,13,48,862,239,10,8,0,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,14,16,13,4,0,0,22,0,0,0,-1--1--1,,1|(815,239)|
1,15,16,2,100,0,0,22,0,0,0,-1--1--1,,1|(731,239)|
11,16,48,773,239,6,8,34,3,0,0,1,0,0,0
10,17,eliminieren,773,260,48,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,18,20,3,4,0,0,22,2,0,0,-1--1--1,|12||0-0-0,1|(624,150)|
1,19,20,2,100,0,0,22,2,0,0,-1--1--1,|12||0-0-0,1|(624,197)|
11,20,604,624,176,8,6,33,3,0,0,2,0,0,0
10,21,speichern,572,176,44,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
12,22,48,402,372,10,8,0,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,23,25,22,4,0,0,22,0,0,0,-1--1--1,,1|(402,343)|
1,24,25,1,100,0,0,22,0,0,0,-1--1--1,,1|(402,292)|
11,25,48,402,317,8,6,33,3,0,0,4,0,0,0
10,26,ausscheiden,466,317,56,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,27,ka Nahrung,304,138,52,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,28,kr,463,160,11,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,29,ke,799,161,13,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,30,ks,536,146,12,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,31,27,7,1,0,0,0,0,64,0,-1--1--1,,1|(297,196)|
1,32,1,11,1,0,0,0,0,64,0,-1--1--1,,1|(485,199)|
1,33,2,16,1,0,0,0,0,64,0,-1--1--1,,1|(718,209)|
1,34,28,11,1,0,0,0,0,64,0,-1--1--1,,1|(505,177)|
1,35,2,20,1,0,0,0,0,64,0,-1--1--1,,1|(584,195)|
1,36,29,16,1,0,0,0,0,64,0,-1--1--1,,1|(808,208)|
10,37,Bioverfügbarkeit,537,358,44,24,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,38,37,25,1,0,0,0,0,64,0,-1--1--1,,1|(447,346)|
1,39,37,11,1,0,0,0,0,64,0,-1--1--1,,1|(553,309)|
1,40,28,25,1,0,0,0,0,64,0,-1--1--1,,1|(486,280)|
10,41,HWZe,827,106,30,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,42,41,29,1,0,0,0,0,64,0,-1--1--1,,1|(842,137)|
10,43,Dosis,230,335,27,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,44,43,7,1,0,0,0,0,64,0,-1--1--1,,1|(283,288)|
1,45,1,25,1,0,0,0,0,64,0,-1--1--1,,1|(437,287)|
1,46,30,20,1,0,0,0,0,64,0,-1--1--1,,1|(573,150)|
10,47,mg Plasma,655,378,41,26,3,131,0,36,0,0,0,0,0-0-0,255-255-128,Helvetica|12||0-0-0
1,48,50,2,4,0,0,22,0,0,0,-1--1--1,,1|(653,283)|
1,49,50,47,68,0,0,22,2,0,0,-1--1--1,|12||0-0-0,1|(653,331)|
11,50,412,653,304,8,6,33,3,0,0,4,0,0,0
10,51,umwandeln,712,304,51,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,52,2,50,1,0,0,0,0,64,0,-1--1--1,,1|(605,288)|
1,53,47,50,1,0,0,0,0,64,0,-1--1--1,,1|(717,356)|
10,54,HWZu,784,371,29,13,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,55,ku,787,319,12,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,56,55,50,1,0,0,0,0,64,0,-1--1--1,,1|(739,285)|
1,57,54,55,1,0,0,0,0,64,0,-1--1--1,,1|(833,328)|
10,58,"Serum-Ferritin",572,461,37,25,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,59,Aufnahme Faktor,425,430,46,23,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,60,58,59,1,0,0,0,0,64,0,-1--1--1,,1|(490,462)|
1,61,47,59,1,0,0,0,0,64,0,-1--1--1,,1|(577,428)|
1,62,59,25,1,0,0,0,0,64,0,-1--1--1,,1|(361,373)|
1,63,59,11,1,0,0,0,0,64,0,-1--1--1,,1|(579,310)|
10,64,kf,743,106,10,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,65,67,2,4,0,0,22,0,0,0,-1--1--1,,1|(675,195)|
1,66,67,3,100,0,0,22,0,0,0,-1--1--1,,1|(675,147)|
11,67,332,675,171,8,6,33,3,0,0,4,0,0,0
10,68,freisetzen,728,171,45,13,40,3,0,32,-1,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,69,3,67,1,0,0,0,0,64,0,-1--1--1,,1|(708,141)|
1,70,64,67,1,0,0,0,0,64,0,-1--1--1,,1|(741,133)|
10,71,Start,156,128,24,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,72,Ende,120,176,25,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,73,Dauer,110,234,29,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,74,Wiederholungszeit,96,316,69,31,8,131,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
10,75,ka Tablette,183,71,52,13,8,3,0,32,0,0,0,0,0-0-0,0-0-0,Helvetica|12||0-0-0
1,76,75,7,1,0,0,0,0,64,0,-1--1--1,,1|(230,127)|
1,77,71,7,1,0,0,0,0,64,0,-1--1--1,,1|(220,170)|
1,78,72,7,1,0,0,0,0,64,0,-1--1--1,,1|(195,199)|
1,79,73,7,1,0,0,0,0,64,0,-1--1--1,,1|(195,214)|
1,80,74,7,1,0,0,0,0,64,0,-1--1--1,,1|(196,271)|
///---\\\
:L<%^E!@
1:Current.vdf
9:Current
23:0
15:0,0,0,1,0,0
19:100,0
27:2,
34:0,
4:Time
5:mg Blut
24:0
25:360
26:360