7 lines
151 B
Mathematica
7 lines
151 B
Mathematica
|
|
function X = negatefactors(X,L)
|
||
|
|
if ~isempty(X.midfactors)
|
||
|
|
for i = 1:length(X.midfactors)
|
||
|
|
X.leftfactors{i} = -X.leftfactors{i};
|
||
|
|
end
|
||
|
|
end
|