tag:blogger.com,1999:blog-9089624119221753010.post4210791445966068564..comments2023-11-30T19:05:15.988+09:00Comments on vallog: "再帰も"ループも使わずに配列を逆順にする:継続呼び出し編valvallowhttp://www.blogger.com/profile/08767555476671212941noreply@blogger.comBlogger2125tag:blogger.com,1999:blog-9089624119221753010.post-24356036747160777312010-03-12T13:14:21.300+09:002010-03-12T13:14:21.300+09:00山崎先生
いやー・・・パッと見てもよくわかりませんし、動作もイメージできませんorz
Prolo...山崎先生<br /><br />いやー・・・パッと見てもよくわかりませんし、動作もイメージできませんorz<br /><br />Prologやると、これまた頭の作りが変わりそうですね!valvallowhttps://www.blogger.com/profile/08767555476671212941noreply@blogger.comtag:blogger.com,1999:blog-9089624119221753010.post-61583333176522150292010-03-12T09:35:06.961+09:002010-03-12T09:35:06.961+09:00山崎です
prolog で差分リストを使ったリバースです。
述語の再帰だけで(スコーレム)関数は使っ...山崎です<br />prolog で差分リストを使ったリバースです。<br />述語の再帰だけで(スコーレム)関数は使っていないので、可逆的に利用可能<br /><br />rev(X,X,Y,Y).<br />rev([A|X1],X2,Y1,Y2) :- rev(X1,X2,Y1,[A|Y2]).<br /><br />実行結果<br /><br />?- rev([1,2,3,4],[],R,[]).<br />R = [4, 3, 2, 1].<br /><br />?- rev(R,[],[4,3,2,1],[]).<br />R = [1, 2, 3, 4] .山崎noreply@blogger.com