

test(){

	cfMicro(A1, Cl / V, first = (Aa = Ka))

	dosepoint(Aa)

	C = A1 / V

	error(CEps = 1)

	observe(CObs = C + CEps)

	stparm(Ka = tvKa * exp(nKa))

	stparm(V = tvV * exp(nV))

	stparm(Cl = tvCl * exp(nCl))

	covariate(wt)

	fixef(tvKa = c(, 2, ))

	fixef(tvV = c(, 1, ))

	fixef(tvCl = c(, 1, ))

	ranef(diag(nV, nCl, nKa) = c(1, 1, 1))

}