1
genVertex(List,Row,Col,Result) :-
Col1 is Col,
repeat,
(Col \= Row ->
calculateSum(List,List,Row,Col1,Y),write(Y),write('\n'),
Result = [Y|Tail]
;Result = Tail
),
Col1 is Col1 + 1,
Col1 == 5.
Col1が5になるまで、calculateSumをCol + 1のインクリメントで呼び出したいですか?なぜ繰り返し動作しないのですか?
これを達成するための方法は他にありますか?