diff options
Diffstat (limited to 'coq.ml')
-rw-r--r-- | coq.ml | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -148,6 +148,8 @@ module Leibniz = struct let path = ["Coq"; "Init"; "Logic"] let eq_refl = lazy (init_constant path "eq_refl") let eq_refl ty x = lapp eq_refl [| ty;x|] + let eq ty = Term.mkApp (init_constant path "eq", [| ty |]) + end module Option = struct |