このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1274998754/650
#  すみません、プログラミング初心者で行き詰まってしまい質問をさせて頂きます。 
#   
#  4×4の行列を考え、int y[i][j]とそれに対応する文字Xijを考えます。(例えばy[2][3]にはx23という文字が対応) 
#  今、y[i][j]には0または1の数字が割り当てられています。(つまり0、1の4×4行列が予め与えられている状況) 
#  このうち、1の数字が割り当てられているyに対応するxの和だけを表示するようなプログラミングを作成したいのです。 
#  例)y[1][3]=1,y[1][4]=1,y[2][4]=1,y[3][1]=0,y[3][2]=0の場合、 
#  x13+x14+x24 
#   
#  手元の参考書やネット検索など、いろいろ試みたのですが、どうしても解決できず、質問させていただきました。 
#  分かりにくい説明、長文失礼致しました。何卒よろしくお願いします。 
#   

'1の数字が割り当てられているyに対応するxの和だけを表示する'(_行列,_1の数字の割り当てられているxの和) :-
        length(_行列,Len1),
        _行列=[L0|_],
        length(L0,Len2),
        findsum(X,(
                    for(1,M,Len1),
                    for(1,N,Len2),
                    list_nth(M,_行列,L),
                    list_nth(N,L,1),
                    X is 16 * M + N),
                _1の数字の割り当てられているxの和).