Karetta|Gaucheプãƒã‚°ãƒ©ãƒŸãƒ³ã‚°(ç«‹èªã¿ç‰ˆ)|継続渡ã—スタイル継続渡ã—å½¢å¼ éšŽä¹—factã‹ã‚‰å§‹ã‚ã¾ã—ょã†ã€‚ ;; 階乗ã®æ™®é€šã®å®šç¾© (define (fact n) (if (= n 0) 1 (* n (fact (- n 1))))) 上記ã®éšŽä¹—factã®å®šç¾©ã¯ 引数nãŒ0ãªã‚‰1ã‚’è¿”ã™(基底æ¡ä»¶) ãれ以外ãªã‚‰n-1ã®éšŽä¹—ã«nを掛ã‘ãŸã‚‚ã®ã‚’è¿”ã™(å†å¸°æ¡ä»¶) ã¨ãªã£ã¦ã„ã¾ã™ã€‚ ã“れをfactã‹ã‚‰ç›´æŽ¥å€¤ã‚’è¿”ã™ã®ã§ã¯ãªã〠返ã™ã¹ã値を継続手続ãã¨å‘¼ã°ã‚Œã‚‹ã‚‚ã®ã«æ¸¡ã—ã¾ã™ã€‚ 継続手続ã自体ã¯ç‰¹åˆ¥ãªé–¢æ•°ã§ã¯ã‚ã‚Šã¾ã›ã‚“。 å˜ã«ã€æœ¬æ¥è¿”り値を返ã™ã¨ã“ã‚ã§ã€ãã®æ‰‹ç¶šãã«ã€Œã‚ã¨ã¯ã‚ˆã‚ã—ãã€ã¨ 残りã®å‡¦ç†ã‚’委ãã¦ã—ã¾ã„ã¾ã™ã€‚ ãã†ã„ã†ä½¿ã„方をã•ã‚Œã‚‹æ‰‹ç¶šãã®ã“ã¨ã§ã™ã€‚ ;; 継続渡ã—å½¢å¼ã®éšŽä¹—ã®å®šç¾© (define (fact/cps n cont) (if (= n 0) (cont 1) (fact/cps (- n 1) (lambda (a) (cont (
Practical Scheme
Top (Gauche Users’ Reference)
Top (Gauche Users’ Reference)
gauche関係
gauche.nightã¨ãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚°Gauche - wagavulinã®æ—¥è¨˜
Gaucheã§ãƒ¡ã‚¿ãƒ—ãƒã‚°ãƒ©ãƒŸãƒ³ã‚° ï¼ ï¼ IT
プãƒã‚°ãƒ©ãƒŸãƒ³ã‚°è¨€èªž/Scheme - プãƒã‚°ãƒ©ãƒŸãƒ³ã‚°ã‚¹ãƒ¬ã¾ã¨ã‚ in VIP
dfltweb1.onamae.com – ã“ã®ãƒ‰ãƒ¡ã‚¤ãƒ³ã¯ãŠåå‰.comã§å–å¾—ã•ã‚Œã¦ã„ã¾ã™ã€‚
Gaucheã«ã‚ˆã‚‹Schemeプãƒã‚°ãƒ©ãƒŸãƒ³ã‚°
Gaucheã«ã‚ˆã‚‹Schemeプãƒã‚°ãƒ©ãƒŸãƒ³ã‚°
第27ç« Kahuaアプリケーションを書ã“ㆠ- karetta.jp
Gauche:Packages
Gaucheã§RDBプãƒã‚°ãƒ©ãƒŸãƒ³ã‚°
Top (Gauche Users’ Reference)
Top (Gauche Users’ Reference)
: Gauche&SICPèªæ›¸ä¼šã«å‚åŠ ã—ã¦ã㟠- 日々是é›éŒ¬
Karetta|Gaucheプãƒã‚°ãƒ©ãƒŸãƒ³ã‚°(ç«‹èªã¿ç‰ˆ)
フィボナッãƒè¨ˆç®—アルゴリズム比較ã®ã‚¢ãƒ¬
Top (Gauche Users’ Reference)
{{#tags}}- {{label}}
{{/tags}}