list - 列表域和标签的序言列表

Question

L=[[X,Y,Z],[1,A,B],[2,C,D]], L ins 1..3, all_different(L), label(L)。

我只想用值填充列表列表中的变量。get_element_at(L,1)是否有任何解决方案可以以比等等更简单的方式获取列表的元素（它们是列表） ？

Answer 1

get_element(LL,M,N,Element) :-
        length([_|L01],M),
        length([_|L02],N),
        append(L01,[L|_],LL),
        append(L02,[Element|_],L).