Note: The following documentation of the used formulars is in german... Sorry, but I’m too laszy to translate them right now. :( Google around Widmark and Watson for starters.
Wir errechnen die Blut Alkohol Konzentration (BAK) in Gramm pro Kilogramm.
Blut Alkohol Konzentration (BAK) => c
c = A / (m * r)
Aufgenommene Masse des Alkohols in Gramm => A
A = V * e * pa
Reduktionsfaktor => r
Reduktionsfaktor => r
r = (pb * kw) / (w * m)
Gesamtkoerperwasser (nach Geschlecht) => kw
c = (pa * v * e * w) / (pb * kw)
Average is 0.15 g/kg per hour (0.0025 per minute).