# Bayesian Methods for the Physical Science. Learning from
# Examples in Astronomy and Physics. By S. Andreon and B. Weaver.
data {
zeros <- 0
C <- 1
}
model {
#Using the zero trick
y ~ dnorm(0.0,1.0E-6)
phi <- log(1+pow(y-theta,2))
zeros ~ dpois(phi+C)  
}