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