ivaneeo's blog

          自由的力量,自由的生活。

            BlogJava :: 首頁 :: 聯系 :: 聚合  :: 管理
            669 Posts :: 0 Stories :: 64 Comments :: 0 Trackbacks
          Ackermann函數可用遞推關系如下定義
              A(m,0)=A(m-1,0) m=1,2,…
              A(m,n)=A(m-1,A(m,n-1)) m=1,2,… n=1,2,…
            初始條件為
              A(0,n)=n+1,n=0,1,…

          (define?(A?x?y)
          ??(cond?((=?y?0)?0)
          ????????((=?x?0)?(*?2?y))
          ????????((=?y?1)?2)
          ????????(else?(A?(-?x?1)
          ?????????????????(A?x?(-?y?1))))))

          posted on 2006-07-30 13:21 ivaneeo 閱讀(673) 評論(0)  編輯  收藏 所屬分類: scheme-語言之母
          主站蜘蛛池模板: 汕尾市| 南木林县| 宜城市| 高阳县| 滨州市| 华安县| 深泽县| 皮山县| 利辛县| 大丰市| 青神县| 昌吉市| 图木舒克市| 托里县| 大洼县| 梅河口市| 东阳市| 海门市| 梁山县| 泉州市| 平遥县| 清远市| 永泰县| 霍城县| 扶沟县| 滨海县| 琼海市| 湖口县| 措美县| 佛山市| 集安市| 黔江区| 东乌珠穆沁旗| 喀喇沁旗| 石首市| 岳池县| 木里| 乌审旗| 岳西县| 漳州市| 常熟市|