このディレクトリの索引
#  出題場所 :: http://toro.2ch.net/test/read.cgi/tech/1392388003/4
#  [1] 授業単元:プログラミング基礎 
#  [2] 問題文(含コード&リンク): 
#  struct node {int elem;struct node *next;}; 
#  struct node *list; 
#  問1、中央のセルのポインタを返す関数list midcell(list L)を定義してください。 
#  条件は単方向リストで。また中央のセルとは末尾のセルを除いて考えセルの個数が 
#  2N個の場合N番目のセルのことをいいます。 
#  問2、連結リストLとその途中のセルのポインタMが与えられたとき 
#  先頭LからMの直前のセルまでを切り離し順序を逆転させリストを返す関数 
#  list revfR(list L,list M)を再帰関数で定義してください。 
#  リストLは空でないと仮定します。また本問も単方向リストでお願いします。 
#  問3、問2の機能を持つ関数list revf(list L,list M)を再帰関数を用いず定義してください 
#  よろしくお願いします。 
#  

'問1、中央のセルのポインタを返す関数list midcell(list L)を定義してください。'(L,_中央位置) :-
        append(L1,L2,L),
        length(L1,_中央位置),
        length(L2,_中央位置).