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

Ethanol aufgenommen= INTEG (
	+verdunsten-resorbieren,
		Ethanol g)
	~	g
	~		|

resorbieren=
	PULSE TRAIN(Start, Dauer , Wiederholungszeit , Ende )*kr*Oberfläche cm2
	~	g/Hour [0,?]
	~	Der Konzentrationsquotient ist die treibende Kraft für die Resorption \
		(Diffusion); Die verzögerte Rückkopplung verlangt diese Entscheidung, \
		sonst bilden sich negative Massen. Die Kopplung berücksichtigt die \
		Konzentrationsabhängigkeit der Diffusion.
	|

eliminieren=
	IF THEN ELSE(Ethanol im Blut<0.0135, 0 , ke)
	~	g/Hour [0,?]
	~	Die verzögerte Rückkopplung verlangt diese Entscheidung
	|

verdunsten=
	PULSE TRAIN(Start, Dauer , Wiederholungszeit , Ende )*kv*Oberfläche cm2
	~	g/Hour [0,?]
	~		|

Ethanol verdunstet= INTEG (
	verdunsten,
		0)
	~	g [0,?]
	~		|

Dauer=
	0.05
	~	Hour [0,0.1,0.01]
	~	0.05 entspricht 3 Minuten
	|

Dichte=
	0.7894*1000
	~	g/l
	~		|

Ende=
	1.33
	~	Hour [0,8,0.25]
	~	80 Minuten = 1.33 Std.
	|

Ethanol eliminiert= INTEG (
	eliminieren,
		0)
	~	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=
	0.02
	~	l [0,300]
	~	0.01 l = 10 ml, 0.02 = 20 ml
	|

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

kr=
	0.0007
	~	g/cm2/Hour [0.0001,0.001]
	~	0.0007 g/cm2/h: max. Penetrationsrate für 25% Ethanol in Wasser (worst \
		case)
	|

kv=
	0.4617
	~	g/cm2/Hour [0,?]
	~	461.7 mg·cm2·h-1
	|

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

Start=
	0
	~	Hour [0,?]
	~		|

"Vol %"=
	55
	~	Dmnl [55,95,10]
	~	Alkoholgehalt in Volumen%
	|

Wiederholungszeit=
	0.133
	~	Hour [0,8,0.25]
	~	Jede Stunde eine Applikation, 8 Minuten = 0.133 Std.
	|

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

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

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

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

TIME STEP  = 0.0001
	~	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|120,120,5,0
10,1,Ethanol aufgenommen,537,408,57,34,3,131,0,0,0,0,0,0
10,2,Ethanol im Blut,778,412,53,35,3,131,0,0,0,0,0,0
1,3,5,2,4,0,0,22,0,0,0,-1--1--1,,1|(692,412)|
1,4,5,1,100,0,0,22,0,0,0,-1--1--1,,1|(620,412)|
11,5,380,653,412,6,8,34,3,0,0,1,0,0,0
10,6,resorbieren,653,432,48,12,40,3,0,0,-1,0,0,0
1,7,8,2,100,0,0,22,0,0,0,-1--1--1,,1|(870,409)|
11,8,172,916,409,6,8,34,3,0,0,1,0,0,0
10,9,eliminieren,916,429,47,12,40,3,0,0,-1,0,0,0
10,10,ke,832,318,11,12,8,3,0,0,0,0,0,0
10,11,kr,604,290,10,12,8,3,0,0,0,0,0,0
1,12,11,5,1,0,0,0,0,64,0,-1--1--1,,1|(638,323)|
1,13,10,8,1,0,0,0,0,64,0,-1--1--1,,1|(878,337)|
10,14,Oberfläche cm2,676,557,47,22,8,3,0,0,0,0,0,0
1,15,14,5,1,0,0,0,0,64,0,-1--1--1,,1|(640,503)|
10,16,Gesamtvolumen Liter,191,465,67,23,8,131,0,0,0,0,0,0
10,17,"Vol %",165,520,32,12,8,3,0,0,0,0,0,0
10,18,Dichte,413,566,28,12,8,3,0,0,0,0,0,0
10,19,Ethanol g,322,505,39,12,8,3,0,0,0,0,0,0
1,20,18,19,1,0,0,0,0,64,0,-1--1--1,,1|(333,572)|
1,21,17,19,1,0,0,0,0,64,0,-1--1--1,,1|(245,560)|
1,22,16,19,1,0,0,0,0,64,0,-1--1--1,,1|(228,505)|
10,23,Start,393,247,21,12,8,3,0,0,0,0,0,0
10,24,Ende,466,348,22,12,8,3,0,0,0,0,0,0
10,25,Wiederholungszeit,442,320,74,15,8,131,0,0,0,0,0,0
10,26,Dauer,424,280,26,12,8,3,0,0,0,0,0,0
1,27,28,1,100,0,0,22,0,0,0,-1--1--1,,1|(543,468)|
11,28,252,543,501,8,6,33,3,0,0,4,0,0,0
10,29,verdunsten,596,501,45,12,40,3,0,0,-1,0,0,0
10,30,kv,431,530,12,12,8,3,0,0,0,0,0,0
1,31,30,28,1,0,0,0,0,64,0,-1--1--1,,1|(485,544)|
1,32,14,28,1,0,0,0,0,64,0,-1--1--1,,1|(599,538)|
10,33,Ethanol verdunstet,544,595,51,32,3,131,0,0,0,0,0,0
1,34,28,33,4,0,0,22,0,0,0,-1--1--1,,1|(543,535)|
10,35,Ethanol eliminiert,1054,406,51,35,3,131,0,0,0,0,0,0
1,36,8,35,4,0,0,22,0,0,0,-1--1--1,,1|(962,409)|
1,37,23,5,1,0,0,0,0,64,0,-1--1--1,,1|(475,264)|
1,38,26,5,1,0,0,0,0,64,0,-1--1--1,,1|(533,310)|
1,39,25,5,1,0,0,0,0,64,0,-1--1--1,,1|(559,354)|
1,40,24,5,1,0,0,0,0,64,0,-1--1--1,,1|(565,366)|
1,41,2,8,1,0,0,0,0,64,0,-1--1--1,,1|(863,360)|
1,42,24,28,1,0,0,0,0,64,0,-1--1--1,,1|(458,410)|
1,43,25,28,1,0,0,0,0,64,0,-1--1--1,,1|(415,425)|
1,44,26,28,1,0,0,0,0,64,0,-1--1--1,,1|(370,418)|
1,45,23,28,1,0,0,0,0,64,0,-1--1--1,,1|(358,458)|
1,46,19,1,0,0,0,0,0,64,1,-1--1--1,,1|(407,465)|
///---\\\
:L<%^E!@
9:Current
23:0
15:0,0,0,0,0,0
19:5,0
27:2,
34:0,
5:Dauer
24:0
25:0
26:0