model
	{
		for( i in 1 : N ) {
			x[i,1] ~ dnorm(mu, prec)
		}
		mu ~ dunif (-200, 200)
		prec ~ dunif (0, 1000)
		s2 <- 1/prec
	}