10 lines
194 B
Mathematica
10 lines
194 B
Mathematica
|
|
function X = setcutflag(X,flag)
|
||
|
|
%setcutlag Internal : defines a SET object as a CUT
|
||
|
|
|
||
|
|
if nargin == 1
|
||
|
|
flag = 1;
|
||
|
|
end
|
||
|
|
X = flatten(X);
|
||
|
|
for i = 1:length(X.clauses)
|
||
|
|
X.clauses{i}.cut = flag;
|
||
|
|
end
|