Solve[D[0.6*Log[1+0.42174*x]+0.4*Log[1-0.272*x],x]==0,x]