model{
   # Likelihood function
   k~dbin(theta,N)
   # prior
   theta~dunif(0,1)
}