我一直在尝试在Prolog中编写部分展平功能，但我无法弄清楚如何去做。
一个例子：
我有一份列表清单（是的，我知道......），就像这样：
[
[ [a] , [b] , [c] ] ,
[ [d,e],[f] , [g] ] ,
[ [h] , [i] , [j] ] ,
]
我想将其缩减为列表列表，因此结果如下所示：
[ [a], [b], [c], [d,e], [f] , [g] , [h] , [i] , [j] ]
你能帮我解决这个问题吗？
我的代码现在看起来像这样：
partflat([],[]).
partflat([H|Tail], PartF):-
partflat(Tail, NewL),
append(H,NewL,PartF).