記事中で紹介したスクリプトの全体はCordbergに置いてあります。 今回は型XからXへのbijection、すなわち、X上の自己同型のなす群を形式化します。 ポイントは自己同型の定義方法です。 Structure automorphism_base (X : Type) : Type := mk_automorphism { carrier :> X -> X; inverse : X ...