Deseo saber como realizar el siguiente pseudocodigo en Prolog:
SI PELOTA= 'NO' ENTONCES LIBRO'SI'
SI MANDO='NO' ENTONCES LIBRO ='SI'
SI PELOTA = 'SI' Y ARCO = 'SI' ENTONCES LIBRO = 'NO'
SI LIBRO= 'SI' ENTONCES ACCION="LEER LIBROS"
SI BASKET= 'SI' ENTONCES ACCION="JUGAR BASKET"
SI LIBRO='NO' Y BASKET='NO' ENTONCES ACCION="DORMIR"
Y lo siguiente son las clausulas que consideré, aunque no uso variables, sino paso valores.
predicates
nondeterm es_principal(symbol,symbol).
nondeterm es_objeto(symbol,symbol).
nondeterm accion(string).
clauses
%REGLAS
es_principal(libro,si):-es_objeto(pelota,no). %REGLA_1
es_principal(libro,si):-es_objeto(mando,no). %REGLA_2
es_principal(libro,no):-es_objeto(pelota,si),es_objeto(mando,si). %REGLA_3
accion("Leer libros"):-es_principal(libro,si). %REGLA_4
accion("Jugar basket"):-es_principal(basket,si). %REGLA_5
accion("DORMIR"):-es_principal(libro,no),es_principal(libro,no). %REGLA_6
%HECHOS
es_principal(libro,si).
goal
accion(X).
Lamentablemente, no me sale resultado, sino me sale lo siguiente:
E;Test_Goal, pos:534, 415 Clauses for the same predicate should be grouped es_principal
Entiendo que se deba agrupar, pero traté de separarlos para un mayor orden y el problema me indica que se debe separar los hechos de las clausulas. ¿Cómo puedo mejorar mi código usando variables en las clausulas?.
De antemano, agradezco su ayuda.
¿Cómo puedo mejorar mi código?
estás buscando respuestas basadas en opiniones. Por favor revisa: Cómo preguntar