Laboratorio 2

ESCUELA DE CIENCIAS BÁSICAS, TECNOLOGÍA E INGENIERÍA

GUIA DE LABORATORIO

SISTEMAS EXPERTOS

Elaborado por: DIANA MARCELA CARDONA ROMÁN

BOGOTÁ (COLOMBIA) PROGRAMA INGENIERÍA DE SISTEMAS FEBRERO 2008

GUIA DE LABORATORIO Nombre del curso: Programa al que pertenece SISTEMAS EXPERTOS Ingeniería de Director de curso: Diana Marcela Sistemas Cardona Román

Práctica No. 2 – LógicaProposicional Objetivos de la práctica de laboratorio Utilización de la lógica proposicional para la construcción de un sistema experto e implementación del motor de inferencia. Descripción de la práctica / actividad 1. Instalar SWI-Prolog y con el archivo .pl probar su funcionamiento. Descargue e instale SWI-Prolog http://www.swi.psy.uva.nl/cgi-bin/nph-download/SWIProlog/w32pl5213.exe Abra un editor detexto plano (bloc de notas) y copie las siguientes dos líneas de código prueba(uno). prueba(dos). Luego guarde el archivo con el nombre “prueba.pl” (sin las comillas) y fijese bien que quede la extensión “.pl”, eso se hace seleccionando todos los tipos de datos en la ventana “guardar”, salga del editor. Abra el programa Prolog y ejecute el archivo que acaba de guardar, para ello vaya al menú“file” y luego a la opción “Consult…”, allí seleccione el archivo “prueba.pl” y haga las siguientes preguntas. Si observa el archivo contiene dos hechos, llamados prueba, para lo cual las consultas que vamos a hacer son sobre los dos hechos que tiene el programa. Se va a comprobar el primer hecho para lo cual debe escribir en el espacio de trabajo “prueba(uno).” (sin las comillas) y de un retorno u oprimala tecla “enter”. prueba(uno). (Este es el hecho que usted quiere comprobar, note que al final va un punto, que indica que se ha terminado la línea y puede ejecutarse la instrucción) Yes (esta es la respuesta dada por el programa, una vez comprueba que el hecho está almacenado en su base de hechos) Estos son los hechos que debe comprobar 1 ?- prueba(uno). Yes 2 ?- prueba(dos). Yes 3 ?-prueba(tres). No Otra de las consultas que se pueden hacer es preguntarle al programa cuales hechos tiene, para lo cual puede escribir “prueba(X).” (Note que la “X” está en mayúscula, lo que quiere decir que es una variable que va a tomar los diferentes valores que hayan en

la base de hechos, para ver nuevas respuestas, oprima “;” (punto y coma).) a. En el prompt digite: prueba(X). ; ; 4 ?- prueba(X). X= uno ; X = dos ; No

2. Cree un nuevo programa y llamelo “progenitores.pl”, en el transcriba los siguientes hechos y relaciones y ejecute consultas, luego edite el programa y adicione las siguientes reglas, luego realice consultas al programa completo. En Prolog cree un nuevo archivo usando la opción File--New (use un nombre tal como progenitores.pl) Digite: % hechos mujer(pilar).mujer(lucia). mujer(maria). mujer(belen). mujer(ana). hombre(tomas). hombre(pedro). hombre(jose). %Relaciones progenitor(pilar,belen). progenitor(tomas,belen). progenitor(tomas,lucia). progenitor(belen,ana). progenitor(belen,pedro). progenitor(pedro,jose). progenitor(pedro,maria). Guarde el archivo, salga del editor y ejecute las siguientes consultas, cual es la respuesta? ????????progenitor(pilar,belen).progenitor(pilar,lucia). progenitor(belen,X). mujer(ana). mujer(X). hombre(jose). hombre(maria). hombre(Y).

Modifique el programa adicionándole la siguiente regla, para modificar el programa seleccione el menú “file”, luego “edit…” . una vez modificado guardelo y ejecute una

consulta. %Reglas madre(X,Y):-mujer(X),progenitor(X,Y). consulta. ?-madre(belen,pedro). ¿Cuál es la respuesta? Realicela consulta en PROLOG - ¿De quien es madre belen? - ¿Quién es la madre de belen? Modifique el archivo adicionando la regla para padre(X,Y). y realice la consulta. - ¿Quién es el padre de maria? - ¿De quién es padre Tomas? Modifique el archivo adicionando las relaciones familiares de abuelo y nieto y realice 4 consultas. Coloque las respuestas en el informe 3. a. Transcribir el siguiente...