refactor: standardize skill API keywords to :probabilistic/:deterministic

This commit is contained in:
2026-04-27 12:19:34 -04:00
parent 5f2b7e8d16
commit 6335b0c0c4
16 changed files with 32 additions and 32 deletions

View File

@@ -131,6 +131,6 @@ Interfaces for blueprint actuation and requirement perception. Source of truth i
(defskill :skill-architect (defskill :skill-architect
:priority 110 ; Higher priority to lead the loop :priority 110 ; Higher priority to lead the loop
:trigger #'trigger-skill-architect :trigger #'trigger-skill-architect
:neuro #'neuro-skill-architect :probabilistic #'neuro-skill-architect
:symbolic #'architect-actuate) :deterministic #'architect-actuate)
#+end_src #+end_src

View File

@@ -154,8 +154,8 @@ The *Chaos Gauntlet* skill is designed to be non-invasive, running primarily in
(defskill :skill-chaos (defskill :skill-chaos
:priority 10 ; Lower priority, used for background testing :priority 10 ; Lower priority, used for background testing
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :chaos-trigger)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :chaos-trigger))
:neuro (lambda (context) :probabilistic (lambda (context)
(let ((p (getf context :payload))) (let ((p (getf context :payload)))
(format nil "A chaos trigger was received (~a). Should I run a stress test?" (getf p :mode)))) (format nil "A chaos trigger was received (~a). Should I run a stress test?" (getf p :mode))))
:symbolic #'chaos-stress-test) :deterministic #'chaos-stress-test)
#+end_src #+end_src

View File

@@ -51,8 +51,8 @@ Enable visual communication of plans and system states.
(defskill :skill-diagrammer (defskill :skill-diagrammer
:priority 60 :priority 60
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :visualize)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :visualize))
:neuro #'neuro-skill-diagrammer :probabilistic #'neuro-skill-diagrammer
:symbolic (lambda (action context) action)) :deterministic (lambda (action context) action))
#+end_src #+end_src

View File

@@ -99,6 +99,6 @@ Interfaces for TCP I/O and protocol framing. Source of truth is the Harness Comm
(defskill :skill-emacs-bridge (defskill :skill-emacs-bridge
:priority 100 :priority 100
:trigger (lambda (context) nil) :trigger (lambda (context) nil)
:neuro (lambda (context) nil) :probabilistic (lambda (context) nil)
:symbolic (lambda (action context) action)) :deterministic (lambda (action context) action))
#+end_src #+end_src

View File

@@ -41,8 +41,8 @@ Unify the system's diverse information silos into a single, navigable graph.
(defskill :skill-hyper-graph (defskill :skill-hyper-graph
:priority 70 :priority 70
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :deep-trace)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :deep-trace))
:neuro (lambda (context) "Synthesize a lineage report for the target ID.") :probabilistic (lambda (context) "Synthesize a lineage report for the target ID.")
:symbolic (lambda (action context) action)) :deterministic (lambda (action context) action))
#+end_src #+end_src

View File

@@ -84,6 +84,6 @@ RULES:
(defskill :skill-inbox-processor (defskill :skill-inbox-processor
:priority 100 :priority 100
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :heartbeat)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :heartbeat))
:neuro #'neuro-skill-inbox-processor :probabilistic #'neuro-skill-inbox-processor
:symbolic #'inbox-process-logic) :deterministic #'inbox-process-logic)
#+end_src #+end_src

View File

@@ -73,7 +73,7 @@ Hooks into the `:heartbeat` sensor.
(setf *last-reflection-time* now) (setf *last-reflection-time* now)
t) t)
nil))) nil)))
:neuro (lambda (ctx) :probabilistic (lambda (ctx)
(declare (ignore ctx)) (declare (ignore ctx))
(let* ((memories (sample-random-memories 3)) (let* ((memories (sample-random-memories 3))
(context-string "LATENT REFLECTION CANDIDATES:\n")) (context-string "LATENT REFLECTION CANDIDATES:\n"))
@@ -94,7 +94,7 @@ Find hidden connections, suggest new tags, or propose a new insight that bridges
MANDATE: Output EXACTLY ONE Common Lisp property list starting with (:type :REQUEST). MANDATE: Output EXACTLY ONE Common Lisp property list starting with (:type :REQUEST).
Use the :emacs target and :insert-at-end action to write your reflection into the \"*opencortex-chat*\" buffer." Use the :emacs target and :insert-at-end action to write your reflection into the \"*opencortex-chat*\" buffer."
context-string))) context-string)))
:symbolic (lambda (action ctx) :deterministic (lambda (action ctx)
(declare (ignore ctx)) (declare (ignore ctx))
;; Approve any safe request ;; Approve any safe request
action)) action))

View File

@@ -34,8 +34,8 @@ Automate the "Easy Apply" process on LinkedIn to sustain revenue streams.
(defskill :skill-linkedin (defskill :skill-linkedin
:priority 50 :priority 50
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :revenue-pulse)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :revenue-pulse))
:neuro (lambda (context) nil) :probabilistic (lambda (context) nil)
:symbolic (lambda (action context) action)) :deterministic (lambda (action context) action))
#+end_src #+end_src

View File

@@ -91,6 +91,6 @@ Register the high-fidelity browsing tool with the harness.
(defskill :skill-playwright (defskill :skill-playwright
:priority 150 :priority 150
:trigger (lambda (ctx) (declare (ignore ctx)) nil) ; Passive tool provider :trigger (lambda (ctx) (declare (ignore ctx)) nil) ; Passive tool provider
:neuro nil :probabilistic nil
:symbolic (lambda (action ctx) (declare (ignore ctx)) action)) :deterministic (lambda (action ctx) (declare (ignore ctx)) action))
#+end_src #+end_src

View File

@@ -55,8 +55,8 @@ Eliminate speculative debugging through rigorous scientific methodology.
(defskill :skill-scientist (defskill :skill-scientist
:priority 90 :priority 90
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :test-failure)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :test-failure))
:neuro #'scientist-hypothesis :probabilistic #'scientist-hypothesis
:symbolic #'scientist-propose-fix) :deterministic #'scientist-propose-fix)
#+end_src #+end_src
* Phase B: Blueprint (PROTOCOL) * Phase B: Blueprint (PROTOCOL)

View File

@@ -52,8 +52,8 @@ Automate the extraction of root causes and architectural learnings into the Meme
(defskill :skill-scribe-rca (defskill :skill-scribe-rca
:priority 90 :priority 90
:trigger (lambda (context) (search "SYSTEM ERROR" (format nil "~a" (getf (getf context :payload) :text)))) :trigger (lambda (context) (search "SYSTEM ERROR" (format nil "~a" (getf (getf context :payload) :text))))
:neuro #'scribe-rca-draft :probabilistic #'scribe-rca-draft
:symbolic (lambda (action context) action)) :deterministic (lambda (action context) action))
#+end_src #+end_src
* Phase B: Blueprint (PROTOCOL) * Phase B: Blueprint (PROTOCOL)

View File

@@ -99,6 +99,6 @@ RULES:
(defskill :skill-scribe (defskill :skill-scribe
:priority 60 :priority 60
:trigger #'trigger-skill-scribe :trigger #'trigger-skill-scribe
:neuro #'neuro-skill-scribe-enrich :probabilistic #'neuro-skill-scribe-enrich
:symbolic #'scribe-get-changed-dailies) :deterministic #'scribe-get-changed-dailies)
#+end_src #+end_src

View File

@@ -72,8 +72,8 @@ Interfaces for background verification and kernel alerting. Source of truth is t
:trigger (lambda (context) :trigger (lambda (context)
(let ((sensor (getf (getf context :payload) :sensor))) (let ((sensor (getf (getf context :payload) :sensor)))
(or (eq sensor :buffer-update) (eq sensor :file-saved)))) (or (eq sensor :buffer-update) (eq sensor :file-saved))))
:neuro (lambda (context) nil) :probabilistic (lambda (context) nil)
:symbolic (lambda (action context) :deterministic (lambda (action context)
(let ((file (getf (getf context :payload) :file))) (let ((file (getf (getf context :payload) :file)))
(when (and file (search "projects/" file)) (when (and file (search "projects/" file))
(let ((parts (uiop:split-string file :separator '(#\/)))) (let ((parts (uiop:split-string file :separator '(#\/))))

View File

@@ -128,6 +128,6 @@ Interfaces for TDD suite actuation and protocol perception. Source of truth is t
(defskill :skill-tech-analyst (defskill :skill-tech-analyst
:priority 120 :priority 120
:trigger #'trigger-skill-tech-analyst :trigger #'trigger-skill-tech-analyst
:neuro #'neuro-skill-tech-analyst :probabilistic #'neuro-skill-tech-analyst
:symbolic #'tech-analyst-actuate) :deterministic #'tech-analyst-actuate)
#+end_src #+end_src

View File

@@ -84,8 +84,8 @@ Maintain a state-aware provider cascade that routes around "pain" (failures) and
:trigger (lambda (context) :trigger (lambda (context)
(let ((sensor (getf (getf context :payload) :sensor))) (let ((sensor (getf (getf context :payload) :sensor)))
(or (eq sensor :tool-error) (eq sensor :cost-audit)))) (or (eq sensor :tool-error) (eq sensor :cost-audit))))
:neuro (lambda (context) nil) :probabilistic (lambda (context) nil)
:symbolic (lambda (action context) :deterministic (lambda (action context)
(let ((p (getf (getf context :payload) :provider))) (let ((p (getf (getf context :payload) :provider)))
(when p (token-accountant-record-pain p)) (when p (token-accountant-record-pain p))
action)))) action))))

View File

@@ -127,6 +127,6 @@ loginGemini().catch(err => {
(defskill :skill-web-research (defskill :skill-web-research
:priority 60 :priority 60
:trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :web-search)) :trigger (lambda (context) (eq (getf (getf context :payload) :sensor) :web-search))
:neuro (lambda (context) nil) :probabilistic (lambda (context) nil)
:symbolic (lambda (action context) (ask-gemini-web (getf (getf action :payload) :prompt)))) :deterministic (lambda (action context) (ask-gemini-web (getf (getf action :payload) :prompt))))
#+end_src #+end_src