docs: sync architecture updates and finalize transition to Order 2
This commit is contained in:
@@ -26,15 +26,14 @@ Eliminate speculative debugging through rigorous scientific methodology.
|
||||
** Scientific Loop
|
||||
#+begin_src lisp :tangle projects/org-skill-scientist/src/scientist-logic.lisp
|
||||
(defun scientist-formulate-hypothesis (failure-log)
|
||||
"Analyzes an error and proposes a 'Theory of Failure'."
|
||||
(org-agent:ask-neuro
|
||||
(format nil "Explain why this failure occurred and propose a specific experiment to prove it: ~a" failure-log)
|
||||
:system-prompt "You are a PSF Senior Debugging Scientist. Use formal logic and the scientific method."))
|
||||
|
||||
(defun scientist-run-experiment (hypothesis)
|
||||
"Designs a minimal test case based on a hypothesis."
|
||||
;; Delegates to TDD Runner to create and run the experiment.
|
||||
(org-agent:spawn-task (format nil "Create a minimal failing test for: ~a" hypothesis)))
|
||||
"Analyzes an error and proposes a 'Theory of Failure'.
|
||||
Then triggers the Self-Fix agent."
|
||||
(let ((hypothesis (org-agent:ask-neuro
|
||||
(format nil "Explain why this failure occurred and propose a surgical fix: ~a" failure-log)
|
||||
:system-prompt "You are a PSF Senior Debugging Scientist. Use formal logic and propose a fix in Lisp.")))
|
||||
(kernel-log "SCIENTIST - Hypothesis formulated. Triggering SELF-FIX...")
|
||||
(org-agent:inject-stimulus
|
||||
`(:type :EVENT :payload (:sensor :repair-request :hypothesis ,hypothesis :failure-log ,failure-log)))))
|
||||
#+end_src
|
||||
|
||||
* Registration
|
||||
|
||||
Reference in New Issue
Block a user