model
{
	for (i in 1:N.sample) {
		Y[i] ~ dbin(q, 8)
	}
	logit(q) <- beta
	beta ~ dnorm(0, Tau.noninformative)
	Tau.noninformative <- 1.0E-4
}