begin%Test%
country(id,x,y,t):- id = 1, x >= 0, x <= 4, y >=5 , y <= 15, t >=1800 , t <=1950.
country(id,x,y,t):- id = 1, x >= 0, x <= 8, y >=5, y <=15, t >=1950 , t <= 2000.
country(id,x,y,t):- id = 2, x >= 4, x <= 12, y >=5 , y <=15 , t >= 1800, t <=1950 .
country(id,x,y,t):- id = 2, x >= 8, x <= 12, y >=5 , y <=15 , t >= 1950, t <= 2000.
country(id,x,y,t):- id = 3, x >= 0, x <= 12, y >=0 , y <=5 , t >= 1800, t <= 2000.
location(c,x,y):- x = 3, y = 2, c = 101.
location(c,x,y):- x = 7, y = 3, c = 102.
location(c,x,y):- x = 5, y = 6, c = 103.
location(c,x,y):- x = 7, y = 10, c = 104.
location(c,x,y):- x = 10, y = 8, c = 105.
location(c,x,y):- x = 1, y = 7, c = 106.
location(c,x,y):- x = -8, y = 6, c = 107.
growth(t,c,p):- c = 101, p = 10000 , t >=1800 , t <= 2000.
growth(t,c,p):- c = 102, p = 20000 , t >=1800 , t <= 2000.
growth(t,c,p):- c = 103, p = 10000 , t >=1800 , t <= 2000.
growth(t,c,p):- c = 104, p = 30000 , t >=1800 , t <= 2000.
growth(t,c,p):- c = 105, p = 40000 , t >=1800 , t <= 2000.
growth(t,c,p):- c = 106, p = 35000 , t >=1800 , t <= 2000.
end%Test%