2009-05-20から1日間の記事一覧
traceなんていう便利コマンドがあるのですね。 (defun my-gcd (m n) (if (= (mod m n) 0) n (my-gcd n (mod m n)))) があったときに、Common Lispのプロンプトから以下のようにして使えます。 * (trace my-gcd) (MY-GCD) * (my-gcd 18 30) 0: (MY-GCD 18 30)…
traceなんていう便利コマンドがあるのですね。 (defun my-gcd (m n) (if (= (mod m n) 0) n (my-gcd n (mod m n)))) があったときに、Common Lispのプロンプトから以下のようにして使えます。 * (trace my-gcd) (MY-GCD) * (my-gcd 18 30) 0: (MY-GCD 18 30)…