Cognify

cognify.pl

% Datos de los casos
caso(2, "fraude financiero", "muy bajo", ["impacto económico", "familias afectadas", "arrepentimiento"], "toma de responsabilidad").
caso(3, "violencia doméstica", "moderado", ["perspectiva de la víctima", "dolor familiar", "terapia emocional"], "control de impulsos").
caso(4, "crimen de odio", "muy bajo", ["diversidad cultural", "consecuencias del odio", "empatía hacia minorías"], "comprensión y respeto").
caso(5, "asalto", "bajo", ["dolor físico de la víctima", "miedo experimentado", "apoyo social"], "reducción de la agresión").
caso(6, "abuso de poder", "moderado", ["impacto en subordinados", "pérdida de confianza", "consecuencias sociales"], "responsabilidad social").
caso(7, "tráfico de drogas", "bajo", ["destrucción de vidas", "perspectiva de víctimas de adicción", "pérdidas familiares"], "empatía y conciencia social").
caso(8, "vandalismo", "moderado", ["esfuerzo de la comunidad", "impacto visual y emocional", "arrepentimiento"], "aprecio por el bien común").
caso(9, "corrupción política", "muy bajo", ["pérdida de confianza pública", "impacto económico nacional", "arrepentimiento"], "ética personal fortalecida").
caso(10, "homicidio culposo", "moderado", ["dolor de la familia de la víctima", "perspectiva de la víctima", "reconciliación interna"], "aceptación y redención").
caso(11, "hackeo", "muy bajo", ["consecuencias del robo de datos", "impacto en víctimas de fraude", "remordimiento"], "responsabilidad digital").
caso(12, "pedofilia", "muy bajo", ["dolor de las víctimas", "impacto emocional a largo plazo", "consecuencias legales"], "inhibición de impulsos dañinos").
caso(13, "canibalismo", "moderado", ["dolor y sufrimiento de la víctima", "impacto en la familia de la víctima", "repudio social"], "rechazo hacia el acto").

seleccionar_recuerdos(Crimen, NivelEmpatia, Recuerdos) :-
    caso(_, Crimen, NivelEmpatia, Recuerdos, _).

evaluar_resultado(Crimen, NivelEmpatia, ResultadoEsperado) :-
    caso(_, Crimen, NivelEmpatia, _, ResultadoEsperado).

rehabilitacion(Crimen, NivelEmpatia, Recuerdos, Resultado) :-
    seleccionar_recuerdos(Crimen, NivelEmpatia, Recuerdos),
    evaluar_resultado(Crimen, NivelEmpatia, Resultado).

% Caso específico de Harold Shipman
caso(1, "asesinato en serie", "muy bajo", 
    ["sufrimiento de las víctimas", "dolor de las familias", "perdida irreparable"], 
    "remordimiento y conciencia moral").

No hay corrida, no hay mejora, y sin encabezado

Calificacion final 20 no hay mas modificaciones.