From 6536e135cb2da6eb8702682e6a5313224407f7e5 Mon Sep 17 00:00:00 2001
From: Johannes Pfeifer <jpfeifer@gmx.de>
Date: Thu, 28 Apr 2022 11:23:28 +0200
Subject: [PATCH] Occbin: filter out problems in solving the baseline model

---
 matlab/+occbin/solver.m | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/matlab/+occbin/solver.m b/matlab/+occbin/solver.m
index f99eee041..2d9be1405 100644
--- a/matlab/+occbin/solver.m
+++ b/matlab/+occbin/solver.m
@@ -51,7 +51,16 @@ else
 end
 
 if solve_dr
+    if isempty(options_.qz_criterium)
+        options_.qz_criterium = 1+1e-6;
+    end
+
     [dr,error_flag,M_,oo_] = resol(0,M_,options_,oo_);
+    out.error_flag=error_flag;
+    if error_flag
+        print_info(error_flag, options_.noprint, options_)
+        return;
+    end
     oo_.dr = dr;
     sto_dr=dr;
     sto_M=M_;