From cbf09080f90cd239142477c637451d750cb871f8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?S=C3=A9bastien=20Villemot?= <sebastien@dynare.org> Date: Mon, 25 Feb 2019 17:46:21 +0100 Subject: [PATCH] Octave compatibility fix --- .../example1.mod | 14 +++++++++++--- 1 file changed, 11 insertions(+), 3 deletions(-) diff --git a/tests/conditional_variance_decomposition/example1.mod b/tests/conditional_variance_decomposition/example1.mod index 455489c838..039fa99ab4 100644 --- a/tests/conditional_variance_decomposition/example1.mod +++ b/tests/conditional_variance_decomposition/example1.mod @@ -76,7 +76,11 @@ for i=1:nvar SubsetOfVariables(i) = i_tmp; 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_varobs=strmatch('y',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 error(['Variance decomposition at order ',num2str(options_.order),' does not work']) 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_varobs=strmatch('y',options_.varobs,'exact'); a_pos_varobs=strmatch('a',options_.varobs,'exact'); @@ -123,4 +131,4 @@ shocks; var y; stderr 0; end; -@#endfor \ No newline at end of file +@#endfor -- GitLab