昨日のアレは、splitの定義があんまり一般的でなかったためのようだ。 変な定義でも証明が出来ることが分かったのでよしとする。 (* 私のやつ *) Fixpoint split' {X Y : Type} (l : list (X*Y)) : (list X) * (list Y) := match l with | [] => ([], []) | …
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。