data {
  obs <- 1
}
model {
  parameter ~ dunif(0,1)
  obs ~ dbern(parameter)
}