WolframAlpha computational knowledge AI
plot (-p*log(q)) from q=0 to 1 from p=0 to 1