13から始まる奇数を無限に生成する

説明

Egison言語で13から始まる奇数を無限に生成するには「(define $変数名 {13 @(map (+ $ 2) 変数名)})」とします。(define $n {13 @(map (+ $ 2) n)})とすると無限に変数nに1から始まる奇数が入ります。

サンプル [サンプルをダウンロード]

(define $n {13 @(map (+ $ 2) n)})
(take 20 n)

実行結果

Egison言語を使ったプログラムの実行結果