fork download
  1. (deffacts coefficients
  2. (beta0 10)
  3. (beta1 2)
  4. (beta2 0.3)
  5. )
  6.  
  7. (deffacts students
  8. (student ivan 20 80)
  9. (student maria 30 90)
  10. (student petro 10 70)
  11. (student olga 40 95)
  12. )
  13.  
  14. (defrule glm
  15. (student ?name ?hours ?attendance)
  16. (beta0 ?b0)
  17. (beta1 ?b1)
  18. (beta2 ?b2)
  19. =>
  20. (bind ?result (+ ?b0 (* ?b1 ?hours) (* ?b2 ?attendance)))
  21. (printout t
  22. "Student: " ?name
  23. " Result: " ?result crlf)
  24. )
  25.  
  26. ;; ===== АВТОМАТИЧНИЙ ЗАПУСК І ЗАВЕРШЕННЯ =====
  27. (reset)
  28. (run)
  29. (exit)
  30.  
Success #stdin #stdout 0.01s 5368KB
stdin
Standard input is empty
stdout
Student: olga Result: 118.5
Student: petro Result: 51.0
Student: maria Result: 97.0
Student: ivan Result: 74.0