REFAC: Standardize on Cognitive Cycle and update documentation

system/patches/patch-neuro-economist.lisp

@@ -1,4 +1,4 @@
-(in-package :org-agent)
+(in-package :opencortex)
 
 (defun ask-neuro (prompt &key (system-prompt "You are the Probabilistic Engine engine of a Neurosymbolic Lisp Machine.") (cascade nil) (context nil))
   "Dispatches a neural request through the provider cascade.
@@ -14,7 +14,7 @@
           (kernel-log "PROBABILISTIC ENGINE: Attempting backend ~a..." backend)
           (let* (;; Consult the Economist for the model ID if the skill is available
                  (model (ignore-errors 
-                         (uiop:symbol-call :org-agent.skills.org-skill-economist :economist-get-model-for-provider backend)))
+                         (uiop:symbol-call :opencortex.skills.org-skill-economist :economist-get-model-for-provider backend)))
                  (result (if model 
                              (funcall backend-fn prompt system-prompt :model model)
                              (funcall backend-fn prompt system-prompt))))
@@ -30,7 +30,7 @@
     (unless api-key (return-from execute-openrouter-request "(:type :LOG :payload (:text \"OpenRouter API Key missing\"))"))
     (let* ((headers `(("Content-Type" . "application/json")
                       ("Authorization" . ,(format nil "Bearer ~a" api-key))
-                      ("HTTP-Referer" . "https://github.com/amr/org-agent")))
+                      ("HTTP-Referer" . "https://github.com/amr/opencortex")))
            (body (cl-json:encode-json-to-string
                   `((model . ,model-id)
                     (messages . (( (role . "system") (content . ,system-prompt) )