@k2works/claude-code-booster 4.7.0 → 4.9.0

package/lib/assets/docs/article/getting-start-tdd/clojure/07-protocols-and-records.md

@@ -1,131 +1,131 @@
-# 第 7 章: プロトコルとレコードによるポリモーフィズム
-
-## 7.1 はじめに
-
-この章からは FizzBuzz プログラムに追加仕様を実装しながら、Clojure におけるポリモーフィズムを学びます。Clojure は関数型言語ですが、`defprotocol` と `defrecord` による型ベースのポリモーフィズムを提供しています。
-
-### 追加仕様
-
-```
-1 から 100 までの数をプリントするプログラムを書け。
-ただし 3 の倍数のときは数の代わりに「Fizz」と、5 の倍数のときは「Buzz」とプリントし、
-3 と 5 両方の倍数の場合には「FizzBuzz」とプリントすること。
-タイプごとに出力を切り替えることができる。
-タイプ 1 は通常、タイプ 2 は数字のみ、タイプ 3 は FizzBuzz の場合のみをプリントする。
-```
-
-## 7.2 TODO リスト
-
-- [ ] タイプ 1 の場合（通常の FizzBuzz）
-- [ ] タイプ 2 の場合（数字のみ）
-- [ ] タイプ 3 の場合（FizzBuzz の場合のみ）
-- [ ] それ以外のタイプの場合（例外を発生）
-
-## 7.3 値オブジェクト — FizzBuzzValue
-
-### defrecord による不変データ構造
-
-Clojure の `defrecord` は不変のデータ構造を定義します。Java のクラスと異なり、フィールドは変更できません。
-
-```clojure
-;; src/fizzbuzz/domain/model.clj
-(ns fizzbuzz.domain.model)
-
-(defrecord FizzBuzzValue [number value])
-
-(defn create-fizz-buzz-value [n]
-  (->FizzBuzzValue n (str n)))
-```
-
-`->FizzBuzzValue` は自動生成されるコンストラクタ関数です。
-
-### 述語関数
-
-```clojure
-(defn fizz? [n]
-  (zero? (mod n 3)))
-
-(defn buzz? [n]
-  (zero? (mod n 5)))
-
-(defn fizz-buzz? [n]
-  (and (fizz? n) (buzz? n)))
-```
-
-Clojure の慣例として、述語関数（真偽値を返す関数）は名前の末尾に `?` を付けます。
-
-## 7.4 プロトコル — FizzBuzzType
-
-### defprotocol によるインターフェース定義
-
-`defprotocol` は Java のインターフェースに相当します。実装すべき関数のシグネチャを定義します。
-
-```clojure
-;; src/fizzbuzz/domain/type.clj
-(ns fizzbuzz.domain.type
-  (:require [fizzbuzz.domain.model :as model]))
-
-(defprotocol FizzBuzzType
-  "FizzBuzz タイプごとの文字列生成プロトコル"
-  (generate-string [this value]
-    "FizzBuzzValue から文字列を生成する"))
-```
-
-### レコードによるプロトコル実装
-
-各タイプをレコードとして定義し、プロトコルを実装します。
-
-```clojure
-;; タイプ 1: 通常の FizzBuzz
-(defrecord FizzBuzzType01 []
-  FizzBuzzType
-  (generate-string [_this value]
-    (let [n (:number value)]
-      (cond
-        (model/fizz-buzz? n) "FizzBuzz"
-        (model/fizz? n) "Fizz"
-        (model/buzz? n) "Buzz"
-        :else (str n)))))
-
-;; タイプ 2: 数字のみ
-(defrecord FizzBuzzType02 []
-  FizzBuzzType
-  (generate-string [_this value]
-    (str (:number value))))
-
-;; タイプ 3: FizzBuzz の場合のみ
-(defrecord FizzBuzzType03 []
-  FizzBuzzType
-  (generate-string [_this value]
-    (let [n (:number value)]
-      (cond
-        (model/fizz-buzz? n) "FizzBuzz"
-        (model/fizz? n) "Fizz"
-        (model/buzz? n) "Buzz"
-        :else ""))))
-```
-
-## 7.5 テストの実装
-
-```clojure
-;; test/fizzbuzz/domain/type_test.clj
-(deftest fizz-buzz-type01-test
-  (testing "タイプ 1: 通常の FizzBuzz"
-    (let [t (type/->FizzBuzzType01)]
-      (is (= "1" (type/generate-string t (model/create-fizz-buzz-value 1))))
-      (is (= "Fizz" (type/generate-string t (model/create-fizz-buzz-value 3))))
-      (is (= "Buzz" (type/generate-string t (model/create-fizz-buzz-value 5))))
-      (is (= "FizzBuzz" (type/generate-string t (model/create-fizz-buzz-value 15)))))))
-```
-
-テスト実行 → GREEN。
-
-## 7.6 まとめ
-
-この章では以下のことを学びました。
-
-- **defrecord** による不変データ構造（値オブジェクト）の定義
-- **defprotocol** によるインターフェースの定義
-- レコードによるプロトコルの実装（ポリモーフィズム）
-- 述語関数の命名規則（`?` サフィックス）
-- `let` によるローカルバインディング
+# 第 7 章: プロトコルとレコードによるポリモーフィズム
+
+## 7.1 はじめに
+
+この章からは FizzBuzz プログラムに追加仕様を実装しながら、Clojure におけるポリモーフィズムを学びます。Clojure は関数型言語ですが、`defprotocol` と `defrecord` による型ベースのポリモーフィズムを提供しています。
+
+### 追加仕様
+
+```
+1 から 100 までの数をプリントするプログラムを書け。
+ただし 3 の倍数のときは数の代わりに「Fizz」と、5 の倍数のときは「Buzz」とプリントし、
+3 と 5 両方の倍数の場合には「FizzBuzz」とプリントすること。
+タイプごとに出力を切り替えることができる。
+タイプ 1 は通常、タイプ 2 は数字のみ、タイプ 3 は FizzBuzz の場合のみをプリントする。
+```
+
+## 7.2 TODO リスト
+
+- [ ] タイプ 1 の場合（通常の FizzBuzz）
+- [ ] タイプ 2 の場合（数字のみ）
+- [ ] タイプ 3 の場合（FizzBuzz の場合のみ）
+- [ ] それ以外のタイプの場合（例外を発生）
+
+## 7.3 値オブジェクト — FizzBuzzValue
+
+### defrecord による不変データ構造
+
+Clojure の `defrecord` は不変のデータ構造を定義します。Java のクラスと異なり、フィールドは変更できません。
+
+```clojure
+;; src/fizzbuzz/domain/model.clj
+(ns fizzbuzz.domain.model)
+
+(defrecord FizzBuzzValue [number value])
+
+(defn create-fizz-buzz-value [n]
+  (->FizzBuzzValue n (str n)))
+```
+
+`->FizzBuzzValue` は自動生成されるコンストラクタ関数です。
+
+### 述語関数
+
+```clojure
+(defn fizz? [n]
+  (zero? (mod n 3)))
+
+(defn buzz? [n]
+  (zero? (mod n 5)))
+
+(defn fizz-buzz? [n]
+  (and (fizz? n) (buzz? n)))
+```
+
+Clojure の慣例として、述語関数（真偽値を返す関数）は名前の末尾に `?` を付けます。
+
+## 7.4 プロトコル — FizzBuzzType
+
+### defprotocol によるインターフェース定義
+
+`defprotocol` は Java のインターフェースに相当します。実装すべき関数のシグネチャを定義します。
+
+```clojure
+;; src/fizzbuzz/domain/type.clj
+(ns fizzbuzz.domain.type
+  (:require [fizzbuzz.domain.model :as model]))
+
+(defprotocol FizzBuzzType
+  "FizzBuzz タイプごとの文字列生成プロトコル"
+  (generate-string [this value]
+    "FizzBuzzValue から文字列を生成する"))
+```
+
+### レコードによるプロトコル実装
+
+各タイプをレコードとして定義し、プロトコルを実装します。
+
+```clojure
+;; タイプ 1: 通常の FizzBuzz
+(defrecord FizzBuzzType01 []
+  FizzBuzzType
+  (generate-string [_this value]
+    (let [n (:number value)]
+      (cond
+        (model/fizz-buzz? n) "FizzBuzz"
+        (model/fizz? n) "Fizz"
+        (model/buzz? n) "Buzz"
+        :else (str n)))))
+
+;; タイプ 2: 数字のみ
+(defrecord FizzBuzzType02 []
+  FizzBuzzType
+  (generate-string [_this value]
+    (str (:number value))))
+
+;; タイプ 3: FizzBuzz の場合のみ
+(defrecord FizzBuzzType03 []
+  FizzBuzzType
+  (generate-string [_this value]
+    (let [n (:number value)]
+      (cond
+        (model/fizz-buzz? n) "FizzBuzz"
+        (model/fizz? n) "Fizz"
+        (model/buzz? n) "Buzz"
+        :else ""))))
+```
+
+## 7.5 テストの実装
+
+```clojure
+;; test/fizzbuzz/domain/type_test.clj
+(deftest fizz-buzz-type01-test
+  (testing "タイプ 1: 通常の FizzBuzz"
+    (let [t (type/->FizzBuzzType01)]
+      (is (= "1" (type/generate-string t (model/create-fizz-buzz-value 1))))
+      (is (= "Fizz" (type/generate-string t (model/create-fizz-buzz-value 3))))
+      (is (= "Buzz" (type/generate-string t (model/create-fizz-buzz-value 5))))
+      (is (= "FizzBuzz" (type/generate-string t (model/create-fizz-buzz-value 15)))))))
+```
+
+テスト実行 → GREEN。
+
+## 7.6 まとめ
+
+この章では以下のことを学びました。
+
+- **defrecord** による不変データ構造（値オブジェクト）の定義
+- **defprotocol** によるインターフェースの定義
+- レコードによるプロトコルの実装（ポリモーフィズム）
+- 述語関数の命名規則（`?` サフィックス）
+- `let` によるローカルバインディング

package/lib/assets/docs/article/getting-start-tdd/clojure/08-multimethods-and-design-patterns.md

@@ -1,130 +1,130 @@
-# 第 8 章: マルチメソッドとデザインパターン
-
-## 8.1 はじめに
-
-前章ではプロトコルとレコードによるポリモーフィズムを学びました。この章では **マルチメソッド** による値ベースのディスパッチと、**デザインパターン** の Clojure 的な実現を学びます。
-
-## 8.2 マルチメソッド
-
-### defmulti / defmethod
-
-マルチメソッドは **値に基づいたディスパッチ** を行います。プロトコルが型に基づくのに対し、マルチメソッドは任意の値でディスパッチできます。
-
-```clojure
-;; ディスパッチ関数の定義
-(defmulti generate-by-type
-  "タイプ番号に基づいて FizzBuzz 文字列を生成する"
-  (fn [type-num _value] type-num))
-
-;; タイプごとの実装
-(defmethod generate-by-type 1 [_ value]
-  (let [n (:number value)]
-    (cond
-      (model/fizz-buzz? n) "FizzBuzz"
-      (model/fizz? n) "Fizz"
-      (model/buzz? n) "Buzz"
-      :else (str n))))
-
-(defmethod generate-by-type 2 [_ value]
-  (str (:number value)))
-
-(defmethod generate-by-type 3 [_ value]
-  (let [n (:number value)]
-    (cond
-      (model/fizz-buzz? n) "FizzBuzz"
-      (model/fizz? n) "Fizz"
-      (model/buzz? n) "Buzz"
-      :else "")))
-
-;; デフォルト（未定義タイプ）
-(defmethod generate-by-type :default [type-num _]
-  (throw (ex-info "FizzBuzz タイプが未定義です" {:type type-num})))
-```
-
-### プロトコル vs マルチメソッド
-
-| 特徴 | プロトコル | マルチメソッド |
-|------|-----------|--------------|
-| ディスパッチ基準 | 第 1 引数の型 | 任意の値 |
-| パフォーマンス | 高速（JVM レベル） | やや遅い |
-| 拡張性 | 型の追加で拡張 | メソッドの追加で拡張 |
-| 用途 | インターフェース設計 | 柔軟なディスパッチ |
-
-## 8.3 ファクトリ関数パターン
-
-Clojure ではクラスのコンストラクタの代わりにファクトリ関数を使います。
-
-```clojure
-(defn create-type [type-num]
-  (case type-num
-    1 (->FizzBuzzType01)
-    2 (->FizzBuzzType02)
-    3 (->FizzBuzzType03)
-    (->FizzBuzzTypeNotDefined)))
-```
-
-`case` は `switch` 文に相当し、定数値でのディスパッチに最適化されています。
-
-## 8.4 Command パターン
-
-### プロトコルによる Command パターン
-
-```clojure
-;; src/fizzbuzz/application/command.clj
-(defprotocol FizzBuzzCommand
-  "FizzBuzz コマンドプロトコル"
-  (execute [this]))
-
-;; 単一値コマンド
-(defrecord FizzBuzzValueCommand [number type-num]
-  FizzBuzzCommand
-  (execute [_this]
-    (let [fizz-buzz-type (type/create-type type-num)
-          value (model/create-fizz-buzz-value number)]
-      (type/generate-string fizz-buzz-type value))))
-
-;; リストコマンド
-(defrecord FizzBuzzListCommand [numbers type-num]
-  FizzBuzzCommand
-  (execute [_this]
-    (let [fizz-buzz-type (type/create-type type-num)]
-      (->> numbers
-           (mapv model/create-fizz-buzz-value)
-           (mapv #(type/generate-string fizz-buzz-type %))
-           model/create-fizz-buzz-list))))
-```
-
-### テスト
-
-```clojure
-(deftest fizz-buzz-value-command-test
-  (testing "FizzBuzzValueCommand: 単一値コマンド"
-    (is (= "1" (cmd/execute (cmd/->FizzBuzzValueCommand 1 1))))
-    (is (= "Fizz" (cmd/execute (cmd/->FizzBuzzValueCommand 3 1))))
-    (is (= "Buzz" (cmd/execute (cmd/->FizzBuzzValueCommand 5 1))))
-    (is (= "FizzBuzz" (cmd/execute (cmd/->FizzBuzzValueCommand 15 1))))))
-```
-
-## 8.5 Strategy パターン
-
-Clojure では高階関数が Strategy パターンの自然な表現です。
-
-```clojure
-(defn process-with-strategy [strategy-fn numbers]
-  (mapv strategy-fn numbers))
-
-;; 使用例
-(process-with-strategy fizzbuzz (range 1 101))
-```
-
-関数をファーストクラスの値として渡すことで、Strategy パターンが関数の引数渡しだけで実現できます。
-
-## 8.6 まとめ
-
-この章では以下のことを学びました。
-
-- **defmulti/defmethod** によるマルチメソッド（値ベースのディスパッチ）
-- プロトコルとマルチメソッドの使い分け
-- **ファクトリ関数** パターンと `case` 式
-- **Command パターン** のプロトコルによる実現
-- **Strategy パターン** の高階関数による実現
+# 第 8 章: マルチメソッドとデザインパターン
+
+## 8.1 はじめに
+
+前章ではプロトコルとレコードによるポリモーフィズムを学びました。この章では **マルチメソッド** による値ベースのディスパッチと、**デザインパターン** の Clojure 的な実現を学びます。
+
+## 8.2 マルチメソッド
+
+### defmulti / defmethod
+
+マルチメソッドは **値に基づいたディスパッチ** を行います。プロトコルが型に基づくのに対し、マルチメソッドは任意の値でディスパッチできます。
+
+```clojure
+;; ディスパッチ関数の定義
+(defmulti generate-by-type
+  "タイプ番号に基づいて FizzBuzz 文字列を生成する"
+  (fn [type-num _value] type-num))
+
+;; タイプごとの実装
+(defmethod generate-by-type 1 [_ value]
+  (let [n (:number value)]
+    (cond
+      (model/fizz-buzz? n) "FizzBuzz"
+      (model/fizz? n) "Fizz"
+      (model/buzz? n) "Buzz"
+      :else (str n))))
+
+(defmethod generate-by-type 2 [_ value]
+  (str (:number value)))
+
+(defmethod generate-by-type 3 [_ value]
+  (let [n (:number value)]
+    (cond
+      (model/fizz-buzz? n) "FizzBuzz"
+      (model/fizz? n) "Fizz"
+      (model/buzz? n) "Buzz"
+      :else "")))
+
+;; デフォルト（未定義タイプ）
+(defmethod generate-by-type :default [type-num _]
+  (throw (ex-info "FizzBuzz タイプが未定義です" {:type type-num})))
+```
+
+### プロトコル vs マルチメソッド
+
+| 特徴 | プロトコル | マルチメソッド |
+|------|-----------|--------------|
+| ディスパッチ基準 | 第 1 引数の型 | 任意の値 |
+| パフォーマンス | 高速（JVM レベル） | やや遅い |
+| 拡張性 | 型の追加で拡張 | メソッドの追加で拡張 |
+| 用途 | インターフェース設計 | 柔軟なディスパッチ |
+
+## 8.3 ファクトリ関数パターン
+
+Clojure ではクラスのコンストラクタの代わりにファクトリ関数を使います。
+
+```clojure
+(defn create-type [type-num]
+  (case type-num
+    1 (->FizzBuzzType01)
+    2 (->FizzBuzzType02)
+    3 (->FizzBuzzType03)
+    (->FizzBuzzTypeNotDefined)))
+```
+
+`case` は `switch` 文に相当し、定数値でのディスパッチに最適化されています。
+
+## 8.4 Command パターン
+
+### プロトコルによる Command パターン
+
+```clojure
+;; src/fizzbuzz/application/command.clj
+(defprotocol FizzBuzzCommand
+  "FizzBuzz コマンドプロトコル"
+  (execute [this]))
+
+;; 単一値コマンド
+(defrecord FizzBuzzValueCommand [number type-num]
+  FizzBuzzCommand
+  (execute [_this]
+    (let [fizz-buzz-type (type/create-type type-num)
+          value (model/create-fizz-buzz-value number)]
+      (type/generate-string fizz-buzz-type value))))
+
+;; リストコマンド
+(defrecord FizzBuzzListCommand [numbers type-num]
+  FizzBuzzCommand
+  (execute [_this]
+    (let [fizz-buzz-type (type/create-type type-num)]
+      (->> numbers
+           (mapv model/create-fizz-buzz-value)
+           (mapv #(type/generate-string fizz-buzz-type %))
+           model/create-fizz-buzz-list))))
+```
+
+### テスト
+
+```clojure
+(deftest fizz-buzz-value-command-test
+  (testing "FizzBuzzValueCommand: 単一値コマンド"
+    (is (= "1" (cmd/execute (cmd/->FizzBuzzValueCommand 1 1))))
+    (is (= "Fizz" (cmd/execute (cmd/->FizzBuzzValueCommand 3 1))))
+    (is (= "Buzz" (cmd/execute (cmd/->FizzBuzzValueCommand 5 1))))
+    (is (= "FizzBuzz" (cmd/execute (cmd/->FizzBuzzValueCommand 15 1))))))
+```
+
+## 8.5 Strategy パターン
+
+Clojure では高階関数が Strategy パターンの自然な表現です。
+
+```clojure
+(defn process-with-strategy [strategy-fn numbers]
+  (mapv strategy-fn numbers))
+
+;; 使用例
+(process-with-strategy fizzbuzz (range 1 101))
+```
+
+関数をファーストクラスの値として渡すことで、Strategy パターンが関数の引数渡しだけで実現できます。
+
+## 8.6 まとめ
+
+この章では以下のことを学びました。
+
+- **defmulti/defmethod** によるマルチメソッド（値ベースのディスパッチ）
+- プロトコルとマルチメソッドの使い分け
+- **ファクトリ関数** パターンと `case` 式
+- **Command パターン** のプロトコルによる実現
+- **Strategy パターン** の高階関数による実現