query([]) :-
geost(2,
          [[oid-1,sid-1,x-[[v-0],[v-2]]],
           [oid-2,sid-2,x-[[v-0],[v-0]]],
           [oid-3,sid-3,x-[[v-0],[v-21]]],
           [oid-4,sid-4,x-[[v-1],[v-7]]],
           [oid-5,sid-5,x-[[v-1],[v-2]]],
           [oid-6,sid-6,x-[[v-5],[v-7]]],
           [oid-7,sid-7,x-[[v-17],[v-0]]],
           [oid-8,sid-8,x-[[v-5],[v-13]]],
           [oid-9,sid-9,x-[[v-15],[v-13]]]],
          [[sid-1,t-[[v-0],[v-0]],l-[[v-1],[v-18]]],
           [sid-2,t-[[v-0],[v-0]],l-[[v-17],[v-2]]],
           [sid-3,t-[[v-0],[v-0]],l-[[v-15],[v-3]]],
           [sid-4,t-[[v-0],[v-0]],l-[[v-4],[v-14]]],
           [sid-5,t-[[v-0],[v-0]],l-[[v-16],[v-5]]],
           [sid-6,t-[[v-0],[v-0]],l-[[v-12],[v-6]]],
           [sid-7,t-[[v-0],[v-0]],l-[[v-7],[v-13]]],
           [sid-8,t-[[v-0],[v-0]],l-[[v-10],[v-8]]],
           [sid-9,t-[[v-0],[v-0]],l-[[v-9],[v-11]]]]).