fork download
  1. (deffacts datos
  2. (descartado windows)
  3. (descartado gpu)
  4. (descartado ram)
  5. (descartado bateria-wifi-cmos)
  6. (pendiente ssd-extended)
  7. (pendiente ubuntu-sin-ssd)
  8. (pendiente revisar-placa))
  9.  
  10. (defrule mostrar-descartados
  11. (descartado ?x)
  12. =>
  13. (printout t "Descartado: " ?x crlf))
  14.  
  15. (defrule mostrar-pendientes
  16. (pendiente ?x)
  17. =>
  18. (printout t "Pendiente: " ?x crlf))
  19.  
  20. (defrule conclusion
  21. (descartado ram)
  22. (descartado windows)
  23. (descartado gpu)
  24. =>
  25. (printout t "Sospechoso: SSD o placa/energia" crlf)); your code goes here
  26.  
  27. (exit)
  28. ; empty line at the end
Success #stdin #stdout 0.01s 5272KB
stdin
Standard input is empty
stdout
Standard output is empty