Fuente TeX:
J(r)=\int_0^\infty g(r')dr'-\int_0^r g(r')dr'