summaryrefslogtreecommitdiff
path: root/contrib/funind/rawterm_to_relation.mli
blob: 0075fb0a0707fb7d4bb1937fa8b47bbdcb5d69be (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 :
  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