Closed mattfidler closed 5 months ago
compartment(cmt = 1, volume = V, concentration = Cc) oral(adm = 1, cmt = 1, Tlag = 0, p = F1, ka = ka1, Ktr = Ktr1, Mtt = Mtt1) oral(adm = 1, cmt = 1, Tlag = Tlag2, p = 1-F1, ka = ka2) elimination(cmt = 1, k)
gives
model({ d/dt(depot) <- -ka1 * depot + transit(Mtt1 * Ktr1 - 1, Mtt1, F1) - ka2 * depot f(depot) <- +(ADMD == 2) * (1 - F1) alag(depot) <- Tlag2 d/dt(central) <- +ka1 * depot + ka2 * depot - k * central Cc <- central/V k <- Cl/V })
Actually correct
Bio-availability for transit compartment is given in the transit() function
transit()
gives