OpenBUGS code