1 % (c) 2015 Lehrstuhl fuer Softwaretechnik und Programmiersprachen,
2 % Heinrich Heine Universitaet Duesseldorf
3 % This software is licenced under EPL 1.0 (http://www.eclipse.org/org/documents/epl-v10.html)
4
5 :- module(smt_common_predicates, [is_smt_temp_var/1]).
6
7 :- use_module(probsrc(module_information),[module_info/2]).
8
9 :- use_module(library(lists), [prefix/2]).
10
11 :- module_info(group,smt_solvers).
12 :- module_info(description,'Shared Predicates used by several Modules belonging to the SMT Solvers Integration.').
13
14 :- set_prolog_flag(double_quotes, codes).
15
16 is_smt_temp_var(b(identifier(Name),_,_)) :-
17 atom_codes(Name,Codes),
18 prefix(Codes,"_smt_tmp").