blob: 9cd0412362fcfd3f9602367bf66f2c7b0665fd6a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
(*
[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 :
bool -> (* if true try to detect parameter. Always use it as true except for debug *)
Names.identifier list -> (* The list of function name *)
(Names.name*Rawterm.rawconstr*bool) list list -> (* The list of function args *)
Topconstr.constr_expr list -> (* The list of function returned type *)
Rawterm.rawconstr list -> (* the list of body *)
unit
|