package coq-core

  1. Overview
  2. Docs
The Coq Proof Assistant -- Core Binaries and Tools

Install

Dune Dependency

Authors

Maintainers

Sources

coq-8.19.1.tar.gz
md5=13d2793fc6413aac5168822313e4864e
sha512=ec8379df34ba6e72bcf0218c66fef248b0e4c5c436fb3f2d7dd83a2c5f349dd0874a67484fcf9c0df3e5d5937d7ae2b2a79274725595b4b0065a381f70769b42

doc/src/ltac_plugin/g_eqdecide.ml.html

Source file g_eqdecide.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29

# 17 "plugins/ltac/g_eqdecide.mlg"
 

open Eqdecide
open Stdarg



let _ = Mltop.add_known_module "coq-core.plugins.ltac"
let () = Tacentries.tactic_extend "coq-core.plugins.ltac" "decide_equality" ~level:0 
         [(Tacentries.TyML (Tacentries.TyIdent ("decide", Tacentries.TyIdent ("equality", 
                                                          Tacentries.TyNil)), 
           (fun ist -> 
# 27 "plugins/ltac/g_eqdecide.mlg"
                               decideEqualityGoal 
           )))]

let () = Tacentries.tactic_extend "coq-core.plugins.ltac" "compare" ~level:0 
         [(Tacentries.TyML (Tacentries.TyIdent ("compare", Tacentries.TyArg (
                                                           Extend.TUentry (Genarg.get_arg_tag wit_constr), 
                                                           Tacentries.TyArg (
                                                           Extend.TUentry (Genarg.get_arg_tag wit_constr), 
                                                           Tacentries.TyNil))), 
           (fun c1 c2 ist -> 
# 31 "plugins/ltac/g_eqdecide.mlg"
                                           compare c1 c2 
           )))]

OCaml

Innovation. Community. Security.