plot[log(((1+ix)^(4)-1)/((1-ix)^(4)-1))+3*pi*i-2*i*arctan(x/(1-e^(2*pi*i/4)))-2*i*arctan(x/(1-e^(2*pi*i*2/4)))-2*i*arctan(x/(1-e^(2*pi*i*3/4))),{x,0,20}]