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
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
|
/********************* */
/*! \file proof_checker.cpp
** \verbatim
** Top contributors (to current version):
** Andrew Reynolds
** This file is part of the CVC4 project.
** Copyright (c) 2009-2020 by the authors listed in the file AUTHORS
** in the top-level source directory) and their institutional affiliations.
** All rights reserved. See the file COPYING in the top-level source
** directory for licensing information.\endverbatim
**
** \brief Implementation of quantifiers proof checker
**/
#include "theory/quantifiers/proof_checker.h"
#include "expr/skolem_manager.h"
#include "theory/builtin/proof_checker.h"
using namespace CVC4::kind;
namespace CVC4 {
namespace theory {
namespace quantifiers {
void QuantifiersProofRuleChecker::registerTo(ProofChecker* pc)
{
// add checkers
pc->registerChecker(PfRule::WITNESS_INTRO, this);
pc->registerChecker(PfRule::EXISTS_INTRO, this);
pc->registerChecker(PfRule::SKOLEMIZE, this);
pc->registerChecker(PfRule::INSTANTIATE, this);
}
Node QuantifiersProofRuleChecker::checkInternal(
PfRule id, const std::vector<Node>& children, const std::vector<Node>& args)
{
NodeManager* nm = NodeManager::currentNM();
// compute what was proven
if (id == PfRule::WITNESS_INTRO || id == PfRule::EXISTS_INTRO)
{
Assert(children.size() == 1);
Assert(args.size() == 1);
SkolemManager* sm = nm->getSkolemManager();
Node p = children[0];
Node t = args[0];
Node exists = sm->mkExistential(t, p);
if (id == PfRule::EXISTS_INTRO)
{
return exists;
}
std::vector<Node> skolems;
sm->mkSkolemize(exists, skolems, "k");
Assert(skolems.size() == 1);
return skolems[0];
}
else if (id == PfRule::SKOLEMIZE)
{
Assert(children.size() == 1);
Assert(args.empty());
// can use either negated FORALL or EXISTS
if (children[0].getKind() != EXISTS
&& (children[0].getKind() != NOT || children[0][0].getKind() != FORALL))
{
return Node::null();
}
SkolemManager* sm = nm->getSkolemManager();
Node exists;
if (children[0].getKind() == EXISTS)
{
exists = children[0];
}
else
{
std::vector<Node> echildren(children[0][0].begin(), children[0][0].end());
exists = nm->mkNode(EXISTS, echildren);
}
std::vector<Node> skolems;
Node res = sm->mkSkolemize(exists, skolems, "k");
return res;
}
else if (id == PfRule::INSTANTIATE)
{
Assert(children.size() == 1);
if (children[0].getKind() != FORALL
|| args.size() != children[0][0].getNumChildren())
{
return Node::null();
}
Node body = children[0][1];
std::vector<Node> vars;
std::vector<Node> subs;
for (unsigned i = 0, nargs = args.size(); i < nargs; i++)
{
vars.push_back(children[0][0][i]);
subs.push_back(args[i]);
}
Node inst =
body.substitute(vars.begin(), vars.end(), subs.begin(), subs.end());
return inst;
}
// no rule
return Node::null();
}
} // namespace quantifiers
} // namespace theory
} // namespace CVC4
|