このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1335517816/654
#  [1] 授業単元: プログラミング 
#  [2] 問題文(含コード&リンク): 問題文はリンク先にあります 
#  http://ime.nu/codepad.org/3vEhNLeD 
#  /* 問題文
#  (1)行列の乗算を行う関数
#  (2)行列の(i,j)要素に値をセットする関数
#  (3)行列の(i,j)要素の値を得る関数
#  (4)行列の第p行と第q行を入れ替える関数 を作りなさい。*/

'行列の(i,j)要素に値を得る'(_行列,_i,_j,_値) :-
        length([_|L1],_i),
        append(L1,[_i行|_],_行列),
        length([_|_i行のL1],_j),
        append(_i行のL1,[_値|_],_i行).