Simplify[D[(1/8)*ln(sin(x)-1)+(1/4)*sqrt(2)*arctanh(sin(x)*sqrt(2))-(1/8)*ln(1+sin(x)),x]]