A function for the Lorenz curve - Schettino, Macario (El Colegio de México, 1995)