AUC= INTEG (
	(S2+R2/100)/140,
		0)
	~	mg*Minute [0,?]
	~	AUC: Area Under the Curve
	|

R1= INTEG (
	-Rr,
		1-"S-RS")
	~	mg [0,?]
	~	Menge R-Isomer  im Verdauungstrakt
	|

S1= INTEG (
	-Sr,
		"S-RS")
	~	mg [0,?]
	~	Menge S-Isomer im Verdauungstrakt
	|

krr=
	LN(2)/HWZr
	~	1/Minute [0,?]
	~	Reaktionsgeschwindigkeits-Konstante der Resorption
	|

kse=
	LN(2)/HWZe*87/57
	~	1/Minute [0,?]
	~	Reaktionsgeschwindigkeits-Konstante der Elimination des S-Isomers
	|

HWZr=
	60
	~	Minute [20,90]
	~	Die Aufnahme ist langsamer nach dem Essen. Die Aufnahme von Salzen mit \
		Lysin sind. z.B. rascher.
	|

ksr=
	LN(2)/HWZr
	~	1/Minute [0,?]
	~	Reaktionsgeschwindigkeits-Konstante der Resorption
	|

HWZe=
	147
	~	Minute [120,180]
	~	Halbwertszeit der Elimination, S wird rascher ausgeschieden als R
	|

kre=
	LN(2)/HWZe
	~	1/Minute [0,?]
	~	Reaktionsgeschwindigkeits-Konstante der Elimination des R-Isomers
	|

HWZi=
	180
	~	Minute [60,240]
	~	Inversion; es wurde eine Halbwertszeit von 5 Stunden gefunden, die jedoch \
		wegen der Elimination unrealistisch erscheint, daher ist hier die \
		realistischere Messung von 1.5 Stunden verwendet worden.
	|

ki=
	LN(2)/HWZi
	~	1/Minute [0,?]
	~	Reaktionsgeschwindigkeits-Konstante der Inversion R-> S
	|

"S-RS"=
	1
	~	mg [0.5,1]
	~	Reines S-Isomer=1, reines Racemat 0.5
	|

RSi=
	-ki*R2
	~	mg/Minute
	~		|

R2= INTEG (
	+Rr+RSi-Re,
		0)
	~	mg [0,?]
	~	Menge R-Isomer  im Blut
	|

Re=
	kre*R2
	~	mg/Minute
	~		|

Rr=
	krr*R1
	~	mg/Minute
	~		|

S2= INTEG (
	+Sr-RSi-Se,
		0)
	~	mg [0,?]
	~	Menge S-Isomer  im Blut
	|

Se=
	kse*S2
	~	mg/Minute
	~		|

Sr=
	ksr*S1
	~	mg/Minute
	~		|

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

FINAL TIME  = 480
	~	Minute
	~	The final time for the simulation.
	|

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

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

TIME STEP  = 0.1
	~	Minute [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
10,1,R1,278,136,40,20,3,3,0,0,0,0,0,0
10,2,S1,280,261,40,20,3,3,0,0,0,0,0,0
10,3,R2,474,136,40,20,3,3,0,0,0,0,0,0
10,4,S2,480,258,40,20,3,3,0,0,0,0,0,0
1,5,7,3,36,0,0,22,2,0,0,-1--1--1,|12||0-0-0,1|(477,173)|
1,6,7,4,68,0,0,22,2,0,0,-1--1--1,|12||0-0-0,1|(477,220)|
11,7,220,477,197,8,6,33,3,0,0,4,0,0,0
10,8,RSi,504,197,19,12,40,3,0,0,-1,0,0,0
1,9,11,3,4,0,0,22,0,0,0,-1--1--1,,1|(408,136)|
1,10,11,1,100,0,0,22,0,0,0,-1--1--1,,1|(344,136)|
11,11,524,376,136,6,8,34,3,0,0,1,0,0,0
10,12,Rr,376,156,19,12,40,3,0,0,-1,0,0,0
1,13,15,4,4,0,0,22,0,0,0,-1--1--1,,1|(411,261)|
1,14,15,2,100,0,0,22,0,0,0,-1--1--1,,1|(345,261)|
11,15,300,377,261,6,8,34,3,0,0,1,0,0,0
10,16,Sr,377,281,17,12,40,3,0,0,-1,0,0,0
12,17,48,652,136,10,8,0,3,0,0,-1,0,0,0
1,18,20,17,4,0,0,22,0,0,0,-1--1--1,,1|(613,136)|
1,19,20,3,100,0,0,22,0,0,0,-1--1--1,,1|(543,136)|
11,20,48,578,136,6,8,34,3,0,0,1,0,0,0
10,21,Re,578,156,13,12,40,3,0,0,-1,0,0,0
12,22,48,651,263,10,8,0,3,0,0,-1,0,0,0
1,23,25,22,4,0,0,22,0,0,0,-1--1--1,,1|(612,263)|
1,24,25,4,100,0,0,22,0,0,0,-1--1--1,,1|(545,263)|
11,25,48,577,263,6,8,34,3,0,0,1,0,0,0
10,26,Se,577,283,12,12,40,3,0,0,-1,0,0,0
1,27,3,20,1,0,0,0,0,64,0,-1--1--1,,1|(538,92)|
1,28,4,25,1,0,0,0,0,64,0,-1--1--1,,1|(541,230)|
1,29,3,7,1,0,0,0,0,64,0,-1--1--1,,1|(430,175)|
1,30,1,11,1,0,0,0,0,64,0,-1--1--1,,1|(342,92)|
1,31,2,15,1,0,0,0,0,64,0,-1--1--1,,1|(340,231)|
10,32,ki,372,200,24,12,8,131,0,0,0,0,0,0
10,33,krr,312,59,17,12,8,3,0,0,0,0,0,0
10,34,ksr,302,318,33,13,8,131,0,0,0,0,0,0
10,35,kse,501,326,16,12,8,3,0,0,0,0,0,0
10,36,kre,508,55,15,12,8,3,0,0,0,0,0,0
1,37,36,20,1,0,0,0,0,64,0,-1--1--1,,1|(571,78)|
1,38,35,26,1,0,0,0,0,64,0,-1--1--1,,1|(547,325)|
1,39,34,16,1,0,0,0,0,64,0,-1--1--1,,1|(359,321)|
1,40,33,11,1,0,0,0,0,64,0,-1--1--1,,1|(373,90)|
1,41,32,7,1,0,0,0,0,64,0,-1--1--1,,1|(462,200)|
12,42,0,841,748,40,20,8,0,0,0,-1,0,0,0
10,43,HWZi,313,176,27,12,8,3,0,0,0,0,0,0
1,44,43,32,1,0,0,0,0,64,0,-1--1--1,,1|(345,215)|
10,45,"S-RS",137,257,23,12,8,3,0,0,0,0,0,0
10,46,HWZe,420,75,32,12,8,3,0,0,0,0,0,0
1,47,46,36,1,0,0,0,0,64,0,-1--1--1,,1|(459,51)|
1,48,46,35,1,0,0,0,0,64,0,-1--1--1,,1|(436,284)|
10,49,HWZr,188,202,27,12,8,3,0,0,0,0,0,0
1,50,49,33,1,0,0,0,0,64,0,-1--1--1,,1|(227,106)|
1,51,49,34,1,0,0,0,0,64,0,-1--1--1,,1|(235,293)|
10,52,AUC,665,200,58,25,3,131,0,0,0,0,0,0
1,53,4,52,1,0,0,0,0,64,0,-1--1--1,,1|(541,214)|
1,54,3,52,1,0,0,0,0,64,0,-1--1--1,,1|(552,185)|
1,57,45,1,0,1,0,0,0,64,1,-1--1--1,,1|(196,205)|
1,58,45,2,0,1,0,0,0,64,1,-1--1--1,,1|(193,257)|
///---\\\
:GRAPH GRAPH
:TITLE AUC
:X-AXIS Time
:SCALE
:VAR S2|S-Form
:Y-MIN 0
:Y-MAX 0.5
:DATASET S-Form
:VAR R2|Racemat
:Y-MIN 0
:Y-MAX 0.5
:DATASET Racemat
:L<%^E!@
1:S-Isomer.vdf
1:Racemat.vdf
9:S-Isomer
23:0
15:0,0,0,0,0,0
19:100,0
27:2,
34:0,
4:Time
5:S2
24:0
25:480.02
26:480.02