D[Log[Sin[x]/x], x]