20:- expects_dialect(pfc). 21grid_key(ed='tEdgeOfWorld').
22grid_key(tr=tTree).
23grid_key( rk=tRock).
24grid_key( nt=tNnut).
26
27
28typeGrid(tBigForestMap,1, [ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed]).
29typeGrid(tBigForestMap,2, [ed,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,ed]).
30typeGrid(tBigForestMap,3, [ed,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,ed]).
31typeGrid(tBigForestMap,4, [ed,--,tr,--,nt,--,--,--,tr,tr,--,--,--,--,--,nt,nt,--,--,ed]).
32typeGrid(tBigForestMap,5, [ed,--,--,tr,--,--,--,--,tr,--,--,--,--,nt,nt,nt,--,--,--,ed]).
33typeGrid(tBigForestMap,6, [ed,--,--,--,--,--,tr,tr,tr,tr,tr,tr,--,--,nt,nt,--,--,--,ed]).
34typeGrid(tBigForestMap,7, [ed,--,--,--,--,--,tr,--,--,--,--,--,--,--,--,nt,--,--,--,ed]).
35typeGrid(tBigForestMap,8, [ed,--,--,--,--,--,--,--,--,--,--,--,tr,tr,tr,tr,tr,tr,--,ed]).
36typeGrid(tBigForestMap,9, [ed,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,--,ed]).
37typeGrid(tBigForestMap,10,[ed,--,--,--,nt,--,--,--,--,--,--,--,--,--,--,--,--,--,--,ed]).
38typeGrid(tBigForestMap,11,[ed,--,--,--,nt,--,--,--,--,--,tr,tr,--,--,--,--,--,--,--,ed]).
39typeGrid(tBigForestMap,12,[ed,--,--,tr,tr,nt,nt,--,--,tr,tr,nt,nt,nt,nt,nt,nt,--,--,ed]).
40typeGrid(tBigForestMap,13,[ed,--,--,--,--,--,nt,--,--,tr,--,--,nt,nt,nt,nt,nt,--,--,ed]).
41typeGrid(tBigForestMap,14,[ed,--,--,--,--,--,--,--,tr,tr,--,--,--,--,nt,nt,--,--,--,ed]).
42typeGrid(tBigForestMap,15,[ed,--,--,--,--,tr,tr,tr,tr,tr,--,--,--,nt,nt,--,--,--,--,ed]).
43typeGrid(tBigForestMap,16,[ed,--,--,--,--,--,--,--,--,--,--,--,nt,nt,--,--,tr,--,--,ed]).
44typeGrid(tBigForestMap,17,[ed,--,--,--,--,--,--,--,--,tr,--,nt,nt,--,tr,--,tr,--,--,ed]).
45typeGrid(tBigForestMap,18,[ed,--,--,--,--,--,--,--,--,--,nt,nt,--,--,tr,--,--,--,--,ed]).
46typeGrid(tBigForestMap,19,[ed,--,--,--,--,--,--,--,--,--,--,--,--,--,tr,--,--,--,--,ed]).
47typeGrid(tBigForestMap,20,[ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed,ed]).
48
49
% Test worlds for predator world can be defined by a grid like the % one below. The grid must be rectangular (ie. same number of % columns for each row). It can be of any size. % % To look at the world, use the show_world/0 command. % % The two letter codes used below are defined in map.
objects.pl
% % predator.map.pl
% July 10, 1996 % John Eikenberry % % % Dec 13, 2035 % Douglas Miles % */