このディレクトリの索引
http://pc12.2ch.net/test/read.cgi/tech/1261057499/814
#  Schemeの課題なのですが、 
#   
#  リストLと数nを引数として受け取り,nをLの末尾に追加する関数add-to-tailを定義しなさい. 
#  ;; (add- to-tail (list 0 1 2) 3) should return (list 0 1 2 3) 
#   
#  今回の授業ではlistの扱いを学び、再帰関数作成を主に扱っていたので、おそらく再帰関 
#  数を用いて作成せよ、という事なのでしょうが、全く糸口が掴めません。 
#  restやfirstしか教わってないので、この二つを用いてadd-to-tailを組むにはどうすれば良 
#  いのでしょうか。何かヒントのようなものをお願いします。 
#  ちなみに、色々ググってみたら、append手続きというものを使えば一応は出来たのですが、 
#  再帰関数を使っていないので、おそらく評価して貰えないと思います。 
# 
# 

add_to_tail([],N,[N]).
add_to_tail([A|R1],N,[A|R2]) :- add_to_tail(R1,N,R2).