Skip to content
Snippets Groups Projects
Verified Commit cbf09080 authored by Sébastien Villemot's avatar Sébastien Villemot
Browse files

Octave compatibility fix

parent cda0b319
Branches
No related tags found
No related merge requests found
Pipeline #889 passed
...@@ -76,7 +76,11 @@ for i=1:nvar ...@@ -76,7 +76,11 @@ for i=1:nvar
SubsetOfVariables(i) = i_tmp; SubsetOfVariables(i) = i_tmp;
end end
[observable_pos,index_observables,index_subset]=intersect(SubsetOfVariables,options_.varobs_id,'stable'); if isoctave
[observable_pos,index_observables,index_subset]=intersect_stable(SubsetOfVariables,options_.varobs_id);
else
[observable_pos,index_observables,index_subset]=intersect(SubsetOfVariables,options_.varobs_id,'stable');
end
y_pos=strmatch('y',var_list_,'exact'); y_pos=strmatch('y',var_list_,'exact');
y_pos_varobs=strmatch('y',options_.varobs,'exact'); y_pos_varobs=strmatch('y',options_.varobs,'exact');
a_pos_varobs=strmatch('a',options_.varobs,'exact'); a_pos_varobs=strmatch('a',options_.varobs,'exact');
...@@ -110,7 +114,11 @@ if max(abs(sum(oo_.variance_decomposition,2)-100))>2 ...@@ -110,7 +114,11 @@ if max(abs(sum(oo_.variance_decomposition,2)-100))>2
error(['Variance decomposition at order ',num2str(options_.order),' does not work']) error(['Variance decomposition at order ',num2str(options_.order),' does not work'])
end end
[observable_pos,index_observables,index_subset]=intersect(SubsetOfVariables,options_.varobs_id,'stable'); if isoctave
[observable_pos,index_observables,index_subset]=intersect_stable(SubsetOfVariables,options_.varobs_id);
else
[observable_pos,index_observables,index_subset]=intersect(SubsetOfVariables,options_.varobs_id,'stable');
end
y_pos=strmatch('y',var_list_,'exact'); y_pos=strmatch('y',var_list_,'exact');
y_pos_varobs=strmatch('y',options_.varobs,'exact'); y_pos_varobs=strmatch('y',options_.varobs,'exact');
a_pos_varobs=strmatch('a',options_.varobs,'exact'); a_pos_varobs=strmatch('a',options_.varobs,'exact');
...@@ -123,4 +131,4 @@ shocks; ...@@ -123,4 +131,4 @@ shocks;
var y; stderr 0; var y; stderr 0;
end; end;
@#endfor @#endfor
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment