[Date Index] [Thread Index] [Author Index]

Inequality

• To: mathgroup at smc.vnet.net
• Subject: [mg121999] Inequality
• From: ff mm <venture.knowledge at gmail.com>
• Date: Sat, 8 Oct 2011 05:35:02 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com

(a + b)/2 > (b - a)/(Log[b] - Log[a]) > Sqrt[a b] && a > 0 && b > o &&
a != b
How to judge the inequality is correct or not ?

When I  used "Refine" , I got the results I didn't want .

  In[1]:= Refine[(a+b)/2>(b-a)/(Log[b]-Log[a])>Sqrt[a b],a>0&&b>o&&a!
=b]
Out[1]=(a + b)/2 > (-a + b)/(-Log[a] + Log[b]) > Sqrt[a] Sqrt[b]

I want to get the "True", how ?

Thanks
Sincerely  Adam

• Follow-Ups:
  • Re: Inequality
    • From: Andrzej Kozlowski <akoz@mimuw.edu.pl>