{UTF-8}
********************************************************
	.ethanolaufnahme dermal badewanne
********************************************************~
		Simulation: Peter Bützer
	|

resorbieren=
	kr*Oberfläche cm2*((Konzentration flüssig)-(Konzentration im Blut) )
	~	g/Hour [0,?]
	~	Die Konzentrationsdifferenz ist die treibende Kraft für die Resorption \
		(Diffusion); Die verzögerte Rückkopplung verlangt diese Entscheidung, \
		sonst bilden sich negative Massen
	|

Dichte=
	0.7894*1000
	~	g/l
	~		|

eliminieren=
	IF THEN ELSE(Ethanol im Blut>0.014, ke*Verteilvolumen ,0 )
	~	g/Hour [0,?]
	~	Die verzögerte Rückkopplung verlang diese Entscheidung
	|

Ethanol flüssig= INTEG (
	-resorbieren ,
		Ethanol g)
	~	g [0,?]
	~		|

Ethanol g=
	Gesamtvolumen Liter*"Vol %"/100*Dichte
	~	g [0,?]
	~		|

Ethanol im Blut= INTEG (
	+resorbieren-eliminieren,
		0.0135)
	~	g [0,5]
	~	g Ethanol
	|

Gesamtvolumen Liter=
	200
	~	l [0,300]
	~	0.01 l = 10 ml
	|

ke=
	0.2
	~	g/l/Hour [0.1,0.22]
	~		|

Konzentration flüssig=
	Ethanol flüssig/Gesamtvolumen Liter
	~	g/l [0,?]
	~	Angabe in Promillen
	|

Konzentration im Blut=
	Ethanol im Blut/Verteilvolumen
	~	g/l [0,?]
	~	Angabe in Promillen
	|

Körpergewicht=
	70
	~	kg [50,100]
	~		|

kr=
	5e-005
	~	l/cm2/Hour [1e-005,0.0008]
	~	Penetrationsrate für 25% Ethanol in Wasser 0.0007; normal 0.0003; bei \
		Ethanolkonz. < 2% ca. 0.00005
	|

Oberfläche cm2=
	15000
	~	cm2 [0,22000]
	~	Betroffene Hautoberfläche, Gesamtoberfläche: 1.6-2.2 m2 = 16000-22000 cm2
	|

Verteilvolumen=
	Witmark Faktor*Körpergewicht
	~	l [0,?]
	~		|

"Vol %"=
	1.875
	~	Dmnl [0,12,0.5]
	~	Alkoholgehalt in Volumen%
	|

Witmark Faktor=
	0.65
	~	l/kg [0.5,0.8]
	~		|

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

FINAL TIME  = 1
	~	Hour
	~	The final time for the simulation.
	|

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

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

TIME STEP  = 0.001
	~	Hour [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|96,96,100,0
10,1,Ethanol flüssig,225,176,42,26,3,131,0,4,0,0,0,0,0-0-0,192-255-255,|12||0-0-0
10,2,Ethanol im Blut,430,178,41,26,3,131,0,4,0,0,0,0,0-0-0,255-0-0,|12||0-0-0
1,3,5,2,4,0,0,22,0,0,0,-1--1--1,,1|(363,175)|
1,4,5,1,100,0,0,22,0,0,0,-1--1--1,,1|(297,175)|
11,5,332,332,175,5,6,34,3,0,0,1,0,0,0
10,6,resorbieren,332,191,38,10,40,3,0,0,-1,0,0,0
12,7,48,608,179,10,8,0,3,0,0,-1,0,0,0
1,8,10,7,4,0,0,22,0,0,0,-1--1--1,,1|(569,178)|
1,9,10,2,100,0,0,22,0,0,0,-1--1--1,,1|(501,178)|
11,10,48,536,178,5,6,34,3,0,0,1,0,0,0
10,11,eliminieren,536,194,38,10,40,3,0,0,-1,0,0,0
10,12,ke,469,105,9,10,8,3,0,0,0,0,0,0
10,13,kr,239,102,8,10,8,3,0,0,0,0,0,0
1,14,13,5,1,0,0,0,0,64,0,-1--1--1,,1|(279,112)|
1,15,12,10,1,0,0,0,0,64,0,-1--1--1,,1|(506,120)|
10,16,Oberfläche cm2,222,38,38,18,8,3,0,0,0,0,0,0
1,17,16,5,1,0,0,0,0,64,0,-1--1--1,,1|(301,66)|
10,18,Körpergewicht,400,258,51,18,8,131,0,0,0,0,0,0
10,19,Witmark Faktor,401,309,29,18,8,3,0,0,0,0,0,0
10,20,Verteilvolumen,568,272,53,17,8,131,0,0,0,0,0,0
1,21,19,20,1,0,0,0,0,64,0,-1--1--1,,1|(479,310)|
1,22,18,20,1,0,0,0,0,64,0,-1--1--1,,1|(474,246)|
1,23,20,10,1,0,0,0,0,64,0,-1--1--1,,1|(568,233)|
10,24,Gesamtvolumen Liter,95,174,54,17,8,131,0,0,0,0,0,0
10,25,Konzentration flüssig,127,82,46,16,8,131,0,0,0,0,0,0
1,26,1,25,1,0,0,0,0,64,0,-1--1--1,,1|(199,106)|
1,27,24,25,1,0,0,0,0,64,0,-1--1--1,,1|(78,122)|
10,28,Konzentration im Blut,443,48,46,18,8,3,0,0,0,0,0,0
1,29,2,28,1,0,0,0,0,64,0,-1--1--1,,1|(414,121)|
1,30,20,28,1,0,0,0,0,64,0,-1--1--1,,1|(578,118)|
1,31,25,5,1,0,0,0,0,64,0,-1--1--1,,1|(254,82)|
1,32,28,5,1,0,0,0,0,64,0,-1--1--1,,1|(373,86)|
10,33,"Vol %",97,276,26,10,8,3,0,0,0,0,0,0
10,34,Dichte,250,278,22,10,8,3,0,0,0,0,0,0
10,35,Ethanol g,166,232,31,10,8,3,0,0,0,0,0,0
1,36,34,35,1,0,0,0,0,64,0,-1--1--1,,1|(234,251)|
1,37,33,35,1,0,0,0,0,64,0,-1--1--1,,1|(139,268)|
1,38,24,35,1,0,0,0,0,64,0,-1--1--1,,1|(90,219)|
1,39,35,1,0,0,0,0,0,64,1,-1--1--1,,1|(181,216)|
1,40,2,10,1,0,0,0,0,64,0,-1--1--1,,1|(502,142)|
12,41,2688444,778,581,255,167,3,188,0,0,1,0,0,0
Blutalkohol
1,43,42,5,1,0,0,0,0,64,0,-1--1--1,,1|(342,88)|
///---\\\
:GRAPH Blutalkohol
:TITLE Blutalkohol-Konzentration
:X-AXIS Time
:SCALE
:VAR Konzentration im Blut
:LINE-WIDTH 2
:L<%^E!@
1:0.0003.vdf
9:0.0003
23:0
15:0,0,0,0,0,0
19:100,0
27:2,
34:0,
4:Time
5:kr
24:0
25:0.999991
26:0.999991