src/HOL/SPARK/Examples/Liseq/Longest_Increasing_Subsequence.thy

   with assms have "Max js \<in> js"
     by auto
   with assms have "Max js < i"
     by (auto simp add: iseq_def)
   with fin assms have "\<forall>j\<in>js. j < i"
-    by (simp add: Max_less_iff)
+    by simp
   with assms show ?thesis
     by (simp add: iseq_def)
 qed
 
 lemma iseq_mono: "is \<in> iseq xs i \<Longrightarrow> i \<le> j \<Longrightarrow> is \<in> iseq xs j"