title: Mathematica: Redefine multiplication so that 0*(-Inf) = 0
body: <p>In my Mathematica program, I do some entropy calculations and I want to use this convention: <code>Log[0]*0 = 0.</code> Is there a clean way to do it or I have to write my own function?</p>
  
  <p>Inspired by <a href="http://tinyurl.com/9d8r4rt" rel="nofollow">http://tinyurl.com/9d8r4rt</a> I tried things like this:</p>
  
  <pre><code>Unprotect[Times];
  Times[0,  -Infinity] := 0;
  Protect[Times];
  </code></pre>
  
  <p>But it doesn't seem to work in my case. Is there an elegant way to do this?</p>