src/HOL/Library/BigO.thy
changeset 31337 a9ed5fcc5e39
parent 29786 84a3f86441eb
child 35028 108662d50512
equal deleted inserted replaced
31336:e17f13cd1280 31337:a9ed5fcc5e39
   869   apply (force split: split_max)
   869   apply (force split: split_max)
   870   apply (auto split: split_max simp add: func_plus)
   870   apply (auto split: split_max simp add: func_plus)
   871   done
   871   done
   872 
   872 
   873 lemma bigo_LIMSEQ1: "f =o O(g) ==> g ----> 0 ==> f ----> (0::real)"
   873 lemma bigo_LIMSEQ1: "f =o O(g) ==> g ----> 0 ==> f ----> (0::real)"
   874   apply (simp add: LIMSEQ_def bigo_alt_def)
   874   apply (simp add: LIMSEQ_iff bigo_alt_def)
   875   apply clarify
   875   apply clarify
   876   apply (drule_tac x = "r / c" in spec)
   876   apply (drule_tac x = "r / c" in spec)
   877   apply (drule mp)
   877   apply (drule mp)
   878   apply (erule divide_pos_pos)
   878   apply (erule divide_pos_pos)
   879   apply assumption
   879   apply assumption