再帰の練習

Function test(n As Long)
Debug.Print n
If n > 10000 Then test = test(n / 2)
End Function
結果はだんだん減っていく

Function test(n As Long)
If n > 10000 Then test = test(n / 2)
Debug.Print n
End Function
一番深いネストから順にDebug.Printするので結果はさかさまに出力していく

このあいだのPaul Graham先生の影響で早速（汗、しかし慣れない考え方だなぁ....やはり訓練が必要みたい、ここは実際にSchemeをインストールするしかないか

昔、98君というあだ名の人がPC-9801用のPC-Schemeを「使っていいよ」と持ってきたことがある、あのときこういうふうに出会っていたら僕の人生はどうなっていたんだろう