REAL alpha ~ continuous_uniform(-1, 1)

ENTITY square, "tests/model04/squares.txt", "tests/model04/adjacency.txt"
{
	INTEGER northerness(1)
}

ENTITY bird, ""
{
}

ENTITY squarebird, "tests/model04/observations.txt", combines(square, bird)
{
	INTEGER q = COUNT(&x)
	REAL p = EXP(alpha * northerness + q) / (1 + EXP(alpha * northerness + q))
	INTEGER x ~ user_bernoulli(p)
	INTEGER obs(*) ~ user_defined_points(x)
}

# PARSERIIN ominaisuus: asetetaan variable.setSpatial()

# Mallinkuvauskielestä:
# Spatiaaliset jutut SUM(&x), COUNT(&x) mielellään erillisiin muuttujiin
# Esim. ei näin: p = EXP(SUM(&x) + 1)
# Vaan näin: q = SUM(&x), p= EXP(q+1)
# Koska se helpottaa Fortraniksi kääntämistä (jokaisesta &-jutusta tulee silmukka)

# + jakaumien nimet pitää kiinnittää!
# + miten tässä viitataan käyttäjän jakaumiin?