blob: 8dfeafe7c9bd312918eb66d2f6e3686c01b9d2c0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
open Names
(*
[build_inductive parametrize funnames funargs returned_types bodies]
constructs and saves the graphs of the functions [funnames] taking [funargs] as arguments
and returning [returned_types] using bodies [bodies]
*)
val build_inductive :
(* (ModPath.t * DirPath.t) option ->
Id.t list -> (* The list of function name *)
*)
Evd.evar_map
-> Constr.pconstant list
-> (Name.t * Glob_term.glob_constr * Glob_term.glob_constr option) list list
-> (* The list of function args *)
Constrexpr.constr_expr list
-> (* The list of function returned type *)
Glob_term.glob_constr list
-> (* the list of body *)
unit
|
