Commit 6f406ffc authored by MichelJuillard's avatar MichelJuillard
Browse files

bug correction for exculsion_constants

parent 6c81305d
......@@ -17,6 +17,12 @@ Ri = zeros(k,k,nvar);
sR = size(Ri1);
Ri(1:sR(1),1:sR(2),1:sR(3)) = Ri1;
if options_ms.constants_exclusion
for i=1:nvar
Ri(i,k,i) = 1;
end
end
for n=1:nvar
Ui{n} = null(Qi(:,:,n));
Vi{n} = null(Ri(:,:,n));
......
......@@ -1269,14 +1269,6 @@ SvarIdentificationStatement::writeOutput(ostream &output, const string &basename
}
}
}
if (constants_exclusion_present)
{
for (unsigned int h = 0; h < n; h++)
{
output << "options_.ms.Ri(" << rows[h] << ", " << m << ", " << h+1 << ") = 1;" << endl;
rows[h]++;
}
}
}
}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment