mirror of
https://github.com/Z3Prover/z3
synced 2025-04-28 11:25:51 +00:00
64 lines
2.5 KiB
C++
64 lines
2.5 KiB
C++
/*++
|
|
Copyright (c) 2019 Microsoft Corporation
|
|
|
|
Module Name:
|
|
|
|
api_special_relations.cpp
|
|
|
|
Abstract:
|
|
Basic API for Special relations
|
|
|
|
Author:
|
|
|
|
Nikolaj Bjorner (nbjorner) 2019-03-25
|
|
Ashutosh Gupta 2016
|
|
|
|
Revision History:
|
|
|
|
--*/
|
|
|
|
#include "api/z3.h"
|
|
#include "api/api_log_macros.h"
|
|
#include "api/api_context.h"
|
|
#include "api/api_util.h"
|
|
#include "ast/ast_pp.h"
|
|
#include "ast/special_relations_decl_plugin.h"
|
|
|
|
extern "C" {
|
|
|
|
|
|
#define MK_SPECIAL_R(NAME, FID) \
|
|
Z3_func_decl Z3_API NAME(Z3_context c, Z3_sort s, unsigned index) { \
|
|
LOG_ ##NAME(c, s, index); \
|
|
Z3_TRY; \
|
|
parameter p(index); \
|
|
sort* domain[2] = { to_sort(s), to_sort(s) }; \
|
|
func_decl* f = mk_c(c)->m().mk_func_decl(mk_c(c)->get_special_relations_fid(), FID, 1, &p, 2, domain, mk_c(c)->m().mk_bool_sort()); \
|
|
mk_c(c)->save_ast_trail(f); \
|
|
RETURN_Z3(of_func_decl(f)); \
|
|
Z3_CATCH_RETURN(nullptr); \
|
|
}
|
|
|
|
MK_SPECIAL_R(Z3_mk_linear_order, OP_SPECIAL_RELATION_LO);
|
|
MK_SPECIAL_R(Z3_mk_partial_order, OP_SPECIAL_RELATION_PO);
|
|
MK_SPECIAL_R(Z3_mk_piecewise_linear_order, OP_SPECIAL_RELATION_PLO);
|
|
MK_SPECIAL_R(Z3_mk_tree_order, OP_SPECIAL_RELATION_TO);
|
|
|
|
|
|
#define MK_DECL(NAME, FID) \
|
|
Z3_func_decl Z3_API NAME(Z3_context c,Z3_func_decl f) { \
|
|
Z3_TRY; \
|
|
LOG_ ##NAME(c, f); \
|
|
RESET_ERROR_CODE(); \
|
|
ast_manager & m = mk_c(c)->m(); \
|
|
func_decl* _f = to_func_decl(f); \
|
|
parameter param(_f); \
|
|
sort* domain[2] = { _f->get_domain(0), _f->get_domain(1) }; \
|
|
func_decl * d = m.mk_func_decl(mk_c(c)->get_special_relations_fid(), FID, 1, ¶m, 2, domain); \
|
|
mk_c(c)->save_ast_trail(d); \
|
|
RETURN_Z3(of_func_decl(d)); \
|
|
Z3_CATCH_RETURN(nullptr); \
|
|
}
|
|
|
|
MK_DECL(Z3_mk_transitive_closure, OP_SPECIAL_RELATION_TC);
|
|
};
|