Plot[InverseEllipticNomeQ[I/2 + z], {z, -1, 1}]