¿No será porque no estas concatenando bien la cadena?
$cuerpo .= "Tipo de Persona: ".$Tipo_pers
;"\n";
Creo que debería de ser así:
$cuerpo .= "Tipo de Persona: ".$Tipo_pers
."\n";
Además, hasta donde sé el retorno de carro se hace con \r y \n es para hacer un salto de línea; y si aún así no funciona, prueba poniendo las dos juntas de esta manera \r\n. Espero sea lo que necesitabas o por lo menos te des una idea. Suerte
