Unlambdaのチュートリアル

純粋関数型言語、かつ混迷言語

世に関数型言語と名のつくプログラミング言語はたくさんあります。 Lisp, Scheme, FP, etc... unlambdaはそれらの言語の中でも、 オブジェクトが関数しか存在しないという徹底した「純粋」関数型言語です。

Unlambdaを特徴付けるもう一つのものが、その強烈な難読性です (Unlambdaでプログラムを書くのはそれほど難しくはありません……あくまで読むのと比較して、ですが)。 何しろ、関数や変数に名前をつけるという事すらできないのですから、 後から読み返してその内容を理解するのは、ほぼ「不可能」です。

実際に、その難読性を体感していただきます。 次のプログラムは、アスタリスク(*)を216個連続して出力する「だけ」のプログラムです。

```s``si`k.*`ki```s``s`k``s`ksk``sii``si`k``s``s`kski``s``s`ksk``s``s`kski

実感していただけたでしょうか。とても読めたものではありません。 書いた本人である私も、これを明日見せられて意味が判るかと聞かれれば、 間違いなくノーと答えるでしょう。

ことほどさように、保守性ゼロなこのUnlambdaですが、書いている分には頭の体操にもなってなかなか楽しいです。 この項では、Unlambdaのチュートリアルと題して、Unlambdaの基本的な使い方を解説します。

関数の呼び出し

ある関数Fに、引数Aを与えて実行することを、 「引数Aで関数Fを呼び出す」と言います。 C言語なら、これはF(A)と書き、Lispなら(F A)と書きます。

Unlambdaにはオブジェクトが関数しか存在しない上、行える操作はこの関数呼び出しだけです。 これでプログラムが組めてしまうのだからすごいものです。

Unlambdaでは、関数の呼び出しは「`」(バッククォート)で行われます。 先ほどの例をUnlambdaで書くと、

`FA

となります。

もう少し、複雑な例を示しましょう。 引数Aで関数Gを呼び出した結果を引数として、 関数Fを呼び出す例は以下のようになります。

`F`GA

同様の操作をC言語風に書くとF(G(A))、Lisp風に書くと(F (G A))となります。

また、Unlambdaの特徴として、全ての関数は一つだけ引数をとり(この引数もまた関数です)、 値を一つだけ返します(この返り値もまた関数です)。 引数をとらなかったり、値を返さない関数というものは存在しないのです。

基本的な組み込み関数

.x "print"

xのところには任意の1バイト文字が1つ入ります。 この関数は、任意の一文字を出力する関数です。 引数は何でも良くて、引数はそのまま返り値となります。 例を見てみましょう。

`.a.b

関数.aを、引数.bで呼び出しています。 このコードの出力は以下のようになります。

a

任意の引数.bを、文字aを出力する関数.aに渡して呼び出した結果、 文字aが出力されました。ここで、.bはただの引数で、関数呼び出しは行われていないので、 文字bは出力されません。

また、改行を出力する関数として、rが提供されています。 使い方は、.xと全く同じです。

それでは、プログラミング入門のお約束、Hello, world!プログラムを書いてみましょう。

`r`````````````.H.e.l.l.o.,. .w.o.r.l.d.!.a

バッククォートの数がすごい事になってますね。先頭から読んでいきましょう。 まず、関数rが呼び出されようとしています(まだ呼び出されない)。 その引数として、`r以降の部分が評価されます。 すると、この引数部分は、

  1. 関数.Hに引数.eを与えて呼び出す…… 文字Hが出力され、.eが返される
  2. その返ってきた関数.eに引数.lを与えて呼び出す…… 文字eが出力され、.lが返される
  3. そのまた返ってきた関数.lに引数.lを与えて呼び出す…… 文字lが出力され、.lが返される
  4. ...(中略)...
  5. 関数.!に引数.aを与えて呼び出す…… 文字!が出力され、.aが返される

という流れを経て、 最終的にrの引数部分は.aに評価されます。 ここではじめて最初のrが呼び出され、改行が出力されます。 ちなみにこの.aは、関数として呼び出されていないのでaは出力されません。

i "identity"

関数iは、与えられた引数をそのまま返すだけの関数です。 一見役に立たないように見えて、実はかなり使います。 ですがここでは、毒にも薬にもならない使用例を示します。

``i.ai

このプログラムは、単純に文字aを出力します。解説する必要も特にないでしょう。

k "constant generator"

関数kは、二つの引数を受け取り、二つ目の引数を捨て、一つ目の引数をそのまま返します。 はて、さっき全ての関数は一つしか引数をとらないと書いたじゃないか? と思った貴方、いい所突いてます。 この関数の実際の使用例は、次のようになります。

``kAB

上の式を実行すると、Bは捨てられて、Aが返されます。 よく見ると、kに二つバッククォートが付いているのに気づくはずです。 この式は、実際には

  1. `kAが評価され、 別の関数kA(名前は適当です)が返される
  2. その結果`kABが評価され、 Bが捨てられてAが返される

という流れになります。一引数関数の組み合わせで、擬似的に二引数関数を実現しているわけですね。

二番目の引数を捨てるといっても、評価しないわけではありません。次の例を見てみましょう。

``ki`.ai

この関数は、文字aを出力します。kの二番目の引数が評価される際に、 関数.aが引数iで呼び出されるので、 文字aが出力されるのです。

kはよく、定数関数を作るのに使われます。 以下のようにして定数関数を作ります。

`kA

これで、どんな引数で呼び出されても必ずAを返す関数が作れます。

s "substitution"

関数sは、三つの引数を受け取ります。 仮にX, Y, Zの三つの引数をとったとすると、 引数Zで関数Xを呼び出し 、 引数Zで関数Yを呼び出し、 そして後者の返り値を引数として前者の返り値の関数を呼び出します。

言葉では判りづらいので、実際に書いてみましょう。 次の二つの式は同義です。

```sXYZ
` `XZ `YZ

具体的な例でも見てみましょう。

```skir

は、評価されて次のような式になります。

``kr`ir

すると、関数kに二つの引数r`ir(=r)が渡されて呼び出されます。 そして二番目の引数が捨てられて一番目の引数が返されるので、 この式の値はrとなります。

skは非常に強力な性能を秘めています。 実はこの二つの関数で、iは記述可能なのです。

``skk

この式は、iと完全に同義です。試しに、引数Aで呼び出してみましょう。

```skkA
` `kA `kA
A

……とまぁ、見事にAがそのまま返ってくるわけです。

いろいろ細かい事

コメントの書き方

焼け石に水のような気もしますが、Unlambdaのプログラム中にコメントを含めることができます。 Unlambdaのコメントは、#から行末までの範囲になります。

式の評価順序

例えば、`FAという記述があった場合 (FAも、単一関数でなく `kiのような式かもしれません)、 まずFが評価され、次にAが評価され、 最後に`FAが評価されます。 この順序は、一部の例外的な関数(d)を除いて全ての関数に当てはまります。