fix #2445 fix #2519

Signed-off-by: Nikolaj Bjorner <[email protected]>

Author: NikolajBjorner

src/ast/rewriter/seq_rewriter.cpp

@@ -1005,6 +1005,11 @@ br_status seq_rewriter::mk_seq_at(expr* a, expr* b, expr_ref& result) {
 
     m_lhs.reset();
     m_util.str.get_concat_units(a, m_lhs);
+
+    if (m_lhs.empty()) {
+        result = m_util.str.mk_empty(m().get_sort(a));
+        return BR_DONE;        
+    }
 
     unsigned i = 0;
     for (; i < m_lhs.size(); ++i) {

src/ast/seq_decl_plugin.h

@@ -279,8 +279,9 @@ class seq_util {
         app* mk_lex_le(expr* a, expr* b) const { expr* es[2] = { a, b }; return m.mk_app(m_fid, OP_STRING_LE, 2, es); }
 
 
-        bool is_nth_i(func_decl* f)       const { return is_decl_of(f, m_fid, OP_SEQ_NTH_I); }
-        bool is_nth_u(func_decl* f)       const { return is_decl_of(f, m_fid, OP_SEQ_NTH_U); }
+        bool is_nth_i(func_decl const* f)       const { return is_decl_of(f, m_fid, OP_SEQ_NTH_I); }
+        bool is_nth_u(func_decl const* f)       const { return is_decl_of(f, m_fid, OP_SEQ_NTH_U); }
+        bool is_skolem(func_decl const* f)      const { return is_decl_of(f, m_fid, _OP_SEQ_SKOLEM); }
 
         bool is_string(expr const * n) const { return is_app_of(n, m_fid, OP_STRING_CONST); }
         bool is_string(expr const* n, symbol& s) const {

src/cmd_context/cmd_context.cpp

@@ -1912,6 +1912,19 @@ void cmd_context::validate_model() {
 }
 
 void cmd_context::analyze_failure(model_evaluator& ev, expr* a, bool expected_value) {
+    expr* c = nullptr, *t = nullptr, *e = nullptr;
+    if (m().is_not(a, e)) {
+        analyze_failure(ev, e, !expected_value);
+        return;
+    }
+    if (!expected_value && m().is_or(a)) {
+        for (expr* arg : *to_app(a)) {
+            if (ev.is_true(arg)) {
+                analyze_failure(ev, arg, false);
+                return;
+            }
+        }
+    }
     if (expected_value && m().is_and(a)) {
         for (expr* arg : *to_app(a)) {
             if (ev.is_false(arg)) {
@@ -1920,36 +1933,27 @@ void cmd_context::analyze_failure(model_evaluator& ev, expr* a, bool expected_va
             }
         }
     }
-    expr* c = nullptr, *t = nullptr, *e = nullptr;
     if (expected_value && m().is_ite(a, c, t, e)) {
         if (ev.is_true(c) && ev.is_false(t)) {
-            analyze_failure(ev, t, true);
+            if (!m().is_true(c)) analyze_failure(ev, c, false);
+            if (!m().is_false(t)) analyze_failure(ev, t, true);
             return;
         }
         if (ev.is_false(c) && ev.is_false(e)) {
-            analyze_failure(ev, e, true);
+            if (!m().is_false(c)) analyze_failure(ev, c, true);
+            if (!m().is_false(e)) analyze_failure(ev, e, true);
             return;
         }
     }
-    if (m().is_not(a, e)) {
-        analyze_failure(ev, e, !expected_value);
-        return;
-    }
-    if (!expected_value && m().is_or(a)) {
-        for (expr* arg : *to_app(a)) {
-            if (ev.is_false(arg)) {
-                analyze_failure(ev, arg, false);
-                return;
-            }
-        }
-    }
     if (!expected_value && m().is_ite(a, c, t, e)) {
         if (ev.is_true(c) && ev.is_true(t)) {
-            analyze_failure(ev, t, false);
+            if (!m().is_true(c)) analyze_failure(ev, c, false);
+            if (!m().is_true(t)) analyze_failure(ev, t, false);
             return;
         }
         if (ev.is_false(c) && ev.is_true(e)) {
-            analyze_failure(ev, e, false);
+            if (!m().is_false(c)) analyze_failure(ev, c, true);
+            if (!m().is_true(e)) analyze_failure(ev, e, false);
             return;
         }
     }