view final_pre/src/AgdaParameterizedModule.agda @ 7:0e8b9646d43f

add final_pre
author e155702
date Sun, 17 Feb 2019 05:39:59 +0900
parents
children
line wrap: on
line source

module Sort (A : Set) (_<_ : A -> A -> Bool) where
sort : List A -> List A
sort = -- 実装は省略 ...

-- Parameterized Module により N.sort や B.sort が可能
open import Sort Nat  Nat._<_  as N
open import Sort Bool Bool._<_ as B