src/HOL/SAT.thy
author wenzelm
Wed Nov 29 15:44:51 2006 +0100 (2006-11-29)
changeset 21588 cd0dc678a205
parent 17809 195045659c06
child 26521 f8c4e79db153
permissions -rw-r--r--
simplified method setup;
webertj@17618
     1
(*  Title:      HOL/SAT.thy
webertj@17618
     2
    ID:         $Id$
webertj@17618
     3
    Author:     Alwen Tiu, Tjark Weber
webertj@17618
     4
    Copyright   2005
webertj@17618
     5
webertj@17627
     6
Basic setup for the 'sat' and 'satx' tactic.
webertj@17618
     7
*)
webertj@17618
     8
webertj@17618
     9
header {* Reconstructing external resolution proofs for propositional logic *}
webertj@17618
    10
wenzelm@17722
    11
theory SAT imports Refute
webertj@17618
    12
wenzelm@17722
    13
uses
webertj@17618
    14
     "Tools/cnf_funcs.ML"
webertj@17618
    15
     "Tools/sat_funcs.ML"
webertj@17618
    16
webertj@17618
    17
begin
webertj@17618
    18
wenzelm@17722
    19
text {* \medskip Late package setup: default values for refute, see
wenzelm@21588
    20
  also theory @{theory Refute}. *}
wenzelm@17722
    21
wenzelm@17722
    22
refute_params
wenzelm@17722
    23
 ["itself"=1,
wenzelm@17722
    24
  minsize=1,
wenzelm@17722
    25
  maxsize=8,
wenzelm@17722
    26
  maxvars=10000,
wenzelm@17722
    27
  maxtime=60,
wenzelm@17722
    28
  satsolver="auto"]
wenzelm@17722
    29
wenzelm@17722
    30
webertj@17627
    31
ML {* structure sat = SATFunc(structure cnf = cnf); *}
webertj@17618
    32
wenzelm@21588
    33
method_setup sat = {* Method.no_args (Method.SIMPLE_METHOD' sat.sat_tac) *}
webertj@17618
    34
  "SAT solver"
webertj@17618
    35
wenzelm@21588
    36
method_setup satx = {* Method.no_args (Method.SIMPLE_METHOD' sat.satx_tac) *}
webertj@17618
    37
  "SAT solver (with definitional CNF)"
webertj@17618
    38
webertj@17618
    39
end