Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
MichelJuillard
dynare
Commits
caa04fb2
Commit
caa04fb2
authored
Jul 31, 2015
by
MichelJuillard
Browse files
add explicit opts in calls to linsolve to solve a bug in linsolve.m
for Octave 4.0.0
parent
9557142c
Changes
1
Hide whitespace changes
Inline
Side-by-side
matlab/dyn_first_order_solver.m
View file @
caa04fb2
...
...
@@ -261,7 +261,8 @@ else
Z11
=
Z
(
indx_stable_root
,
indx_stable_root
);
Z21
=
Z
(
indx_explosive_root
,
indx_stable_root
);
Z22
=
Z
(
indx_explosive_root
,
indx_explosive_root
);
[
minus_gx
,
rc
]
=
linsolve
(
Z22
,
Z21
);
opts
.
TRANSA
=
false
;
%
needed
by
Octave
4
.
0
.
0
[
minus_gx
,
rc
]
=
linsolve
(
Z22
,
Z21
,
opts
);
if
rc
<
1e-9
%
Z22
is
near
singular
info
(
1
)
=
5
;
...
...
@@ -273,7 +274,8 @@ else
opts
.
UT
=
true
;
opts
.
TRANSA
=
true
;
hx1
=
linsolve
(
tt
(
indx_stable_root
,
indx_stable_root
),
Z11
,
opts
)
'
;
hx2
=
linsolve
(
Z11
,
ss
(
indx_stable_root
,
indx_stable_root
)
')'
;
opts
.
TRANSA
=
false
;
%
needed
by
Octave
4
.
0
.
0
hx2
=
linsolve
(
Z11
,
ss
(
indx_stable_root
,
indx_stable_root
)
'
,
opts
)
'
;
hx
=
hx1
*
hx2
;
ghx
=
[
hx
(
k1
,
:
)
;
gx
(
k2
(
nboth
+
1
:
end
),
:
)];
end
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment