aboutsummaryrefslogtreecommitdiffstats
path: root/src/zchaff/zchaffParser.mli
blob: 6957f114591f81edd8d9eeb0d3a350349aa189ea (plain)
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
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
(**************************************************************************)
(*                                                                        *)
(*     SMTCoq                                                             *)
(*     Copyright (C) 2011 - 2022                                          *)
(*                                                                        *)
(*     See file "AUTHORS" for the list of authors                         *)
(*                                                                        *)
(*   This file is distributed under the terms of the CeCILL-C licence     *)
(*                                                                        *)
(**************************************************************************)


val _CL : string
val _INF : string
val _VAR : string
val _L : string
val _V : string
val _A : string
val _LITS : string
val _CONF : string
val _EQ : string
val alloc_res :
  'a SmtCertif.clause ->
  'a SmtCertif.clause ->
  'a SmtCertif.clause -> 'a SmtCertif.clause list -> 'a SmtCertif.clause
val parse_tailres : (int, 'a) Hashtbl.t -> SatParser.lex_buff -> 'a list
val parse_resolution :
  (int, 'a SmtCertif.clause) Hashtbl.t ->
  SatParser.lex_buff -> 'a SmtCertif.clause -> 'a SmtCertif.clause
val parse_CL :
  (int, 'a SmtCertif.clause) Hashtbl.t ->
  SatParser.lex_buff -> 'a SmtCertif.clause -> 'a SmtCertif.clause
type var_key = Var of int | Level of int
type 'hform var_decl = {
  var : int;
  ante : 'hform SmtCertif.clause;
  ante_val : int list;
  mutable vclause : 'hform SmtCertif.clause option;
}
type 'hform parse_var_info = (var_key, 'hform var_decl) Hashtbl.t
val var_of_lit : int -> int
val parse_zclause : SatParser.lex_buff -> int list
val parse_VAR_CONF :
  (int, 'a SmtCertif.clause) Hashtbl.t ->
  SatParser.lex_buff -> 'a SmtCertif.clause -> 'a SmtCertif.clause
val parse_proof :
  (int, 'a SmtCertif.clause) Hashtbl.t ->
  string -> 'a SmtCertif.clause -> 'a SmtCertif.clause