Nueva función mprt funciona correctamente. Pendiente de escritura en fichero de resultados