F#によるアクティブケースを用いた外部DSLの変換

-------------------------------------------- //シングルケース (|アクティブパターン識別子|) [引数] = 式 //マルチケース (|アクティブパターン識別子1|アクティブパターン識別子2|..|) [引数] = 式 -------------------------------------------- //パターンマッチ基本使用方法 let パターンマッチ名 引数 = match 引数 with | パターン1(※1) -> 式 | パターン2 -> 式 -------------------------------------------- パターンマッチにおいて、パターンが識別子で2文字以上で大文字で始まる場合は（※1）、コンパイラがアクティブパターンなどのパターン識別子との照合を試みます。一致する識別子が見つからない場合は次のパタ