竹内関数

竹内関数（たけうちかんすう）は、プログラミング言語処理系のベンチマークなどに使われる、再帰的に定義された関数である。

概要

三つの整数 x, y, z に対して、次のように再帰的に定義される。

${\rm {Tarai}}(x,y,z)={\begin{cases}y&{\mbox{ if }}x\leq y\\{\rm {Tarai}}({\rm {Tarai}}(x-1,y,z),{\rm {Tarai}}(y-1,z,x),{\rm {Tarai}}(z-1,x,y))&{\mbox{ otherwise. }}\\\end{cases}}$

定義からわかるように処理を次々にたらい回しにしていくことから、たらいまわし関数、たらい関数 (Tarai function) とも呼ばれる（後述のマッカーシー版との混同を避けるためこの名で呼ばれることのほうが多いが、こちらの定義のほうがオリジナルである。マッカーシー版を特にTak関数として区別する場合もある）。電電公社研究員（当時）の竹内郁雄が1976年に考案した。与える数によって関数の再帰呼び出しの回数が非常に増え、計算量が大きくなるため、コンピュータの性能測定などに用いられる。

他のよくベンチマークに使われる関数と比較して、たとえばフィボナッチ数を何の工夫もなく計算するいわゆるダム（dumb）フィボナッチと比較して、計算量を増やしても、たいして大きな数の計算が必要ない（ワード長の整数演算さえ実装していれば十分）、再帰がたいして深くならない（たいした量のスタックを使えなくても十分）、といった特性があり、関数呼び出し（と戻り）のオーバーヘッドがものをいう、というベンチマークである。

マッカーシー版

ジョン・マッカーシーは竹内関数を記憶違いで z を返すように変更し、これがTak関数として広まった。以下がその定義である。

${\rm {Tak}}(x,y,z)={\begin{cases}z&{\mbox{ if }}x\leq y\\{\rm {Tak}}({\rm {Tak}}(x-1,y,z),{\rm {Tak}}(y-1,z,x),{\rm {Tak}}(z-1,x,y))&{\mbox{ otherwise. }}\\\end{cases}}$

計算量はずっと少ない。

本質

竹内関数の出力は以下のものと同等である。

${\rm {T0}}(x,y,z)={\begin{cases}y&{\mbox{ if }}x\leq y\\z&{\mbox{ if }}x>y{\mbox{ and }}y\leq z\\x&{\mbox{ otherwise. }}\\\end{cases}}$

ドナルド・クヌースによる研究が、Textbook Examples of Recursion(1990)にある。

高速化

竹内関数を高速化するには、関数呼び出しのコストを小さくする、というまっとうな手法と、計算を必要になるまでやらない（引数のx, y, zの値が実際に必要なのは、関数の呼び出し時でなくifの評価時で、しかも常に全部は必要としない）か、一度やった計算の結果を再利用するかして、計算量自体を削減する（当然非常に速い。ベンチマークとしては一種のチートと言えなくもない）手法とがあり、後者には次のような手法がある。

メモ化

一度計算した値を覚えておき、次の呼び出しではその値を使う。

遅延評価

クロージャなどを利用して、関数呼び出しの計算より前に引数を計算すること（先行評価）をしない（ただし、クロージャ生成のコストがかかる）。原則として遅延評価する言語であるHaskellでは定義そのままで非常に速い。他にもScalaなど遅延評価に対応した言語においては、簡単に、非常に高速に評価が終わるコードを作成できる。

マッカーシー版は、メモ化では同様に速い。しかし、マッカーシー版をHaskellなどでそのままの定義で遅延評価した場合は、高速にならない（遅延評価では計算量が減らない）、という違いがある。

関連項目

• アッカーマン関数

外部リンク

• TAK Function
• Wolfram MathWorld
• どう転んでもLisp - スライド10 - 13に作者自身の解説がある
• 東京大学 竹内郁雄研究室