model{
#
#  For first 48 members of 106th House (h106_48.txt):
#
#  y[,1] = Bush 2000 Vote in CD
#  y[,2] = 1 if Southern State (CQ Definition), 0 otherwise
#  y[,3 - 252] = first 250 roll calls in 106th House
#
#
for (i in 1:48){
# Change #
	  for (j in 1:250){
		y[i,j+2] ~ dbern(p[i,j])
		logit(p[i,j]) <- ((beta[1]+y[i,1]*beta[2]+y[i,2]*beta[3])-b[j])*((beta[1]+y[i,1]*beta[2]+y[i,2]*beta[3])-b[j])-((beta[1]+y[i,1]*beta[2]+y[i,2]*beta[3])-q[j])*((beta[1]+y[i,1]*beta[2]+y[i,2]*beta[3])-q[j])
	     }
	  }
   
  ## priors
  for(k in 1:3) {beta[k] ~ dnorm(0.0, .001)}

# Change #	
	for(j in 1:250){
	   b[j] ~ dnorm(0.0,1.0)
	   q[j] ~ dnorm(0.0,1.0)
	}

}