feat(arch): implement 'Code as Thought' architecture and formalize PSF Consensus Loop

system/skills/org-skill-workspace-manager.org

@@ -1,65 +0,0 @@
-#+TITLE: SKILL: Workspace Manager Agent (PARA/Memex Maintenance)
-#+ID: skill-workspace-manager-agent
-#+STARTUP: content
-
-* Overview
-The **Workspace Manager Agent** is responsible for the ongoing maintenance and organization of the Memex workspace. It automates the "housekeeping" aspects of the PARA/Zettelkasten workflow, such as archiving completed tasks and identifying inbox items that require structural attention.
-
-* The Maintenance Mandate
-1. **Clutter Reduction:** Automatically identify tasks marked as DONE and suggest archiving them to preserve the performance of active note files.
-2. **Workflow Alignment:** Ensure that the workspace remains consistent with the user's PARA directory structure.
-3. **Proactive Organization:** Triggers on both buffer saves and background heartbeats to ensure the workspace stays optimized without manual intervention.
-
-* Symbolic Implementation (The Logic)
-The implementation focuses on the efficient identification of "stale" or completed nodes within the object store.
-
-** Architectural Intent: Dual Perception
-Triggers on both direct user edits (buffer updates) and temporal pulses (heartbeats), ensuring that the manager can provide both real-time feedback and autonomous cleanup.
-
-#+begin_src lisp
-(defun trigger-skill-workspace-manager (context)
-  (let* ((payload (getf context :payload))
-         (sensor (getf payload :sensor)))
-    (or (eq sensor :buffer-update)
-        (eq sensor :heartbeat))))
-#+end_src
-
-** Architectural Intent: Stale Task Identification
-This function audits the global object store for headlines in the `DONE` state. It returns a list of IDs to the cognitive layer, providing the "raw material" for an archiving suggestion.
-
-#+begin_src lisp
-(defun archive-completed-tasks ()
-  "Identify DONE tasks and suggest archiving."
-  (let ((done-tasks (org-agent:context-query-store :todo-state "DONE" :type :HEADLINE)))
-    (when done-tasks
-      (kernel-log "WORKSPACE - Found ~a tasks ready for archiving." (length done-tasks))
-      ;; Return a list of IDs to move
-      (mapcar #'org-agent:org-object-id done-tasks))))
-#+end_src
-
-** Architectural Intent: Neuro-Cognitive Archive Drafting
-The neural layer synthesizes the list of completed tasks into a polite archiving request, ensuring the user remains in control of significant workspace moves while reducing the cognitive load of routine maintenance.
-
-#+begin_src lisp
-(defun neuro-skill-workspace-manager (context)
-  (let ((ready-to-archive (archive-completed-tasks))
-        (archive-dir (org-agent::get-env "ARCHIVES_DIR" "/app/8_archives/")))
-    (if ready-to-archive
-        (format nil "
-          WORKSPACE UPDATE -
-          I found these tasks marked DONE in the Atomic Notes (Zettelkasten) - ~a
-          
-          Suggest an Org-mode action to move them to the '~a' folder.
-          Return a Lisp plist - (:target :emacs :action :message :text \"I found completed tasks. Should I archive them?\")
-        " ready-to-archive archive-dir)
-        nil)))
-#+end_src
-
-* Registration
-#+begin_src lisp
-(defskill :skill-workspace-manager
-  :priority 40
-  :trigger #'trigger-skill-workspace-manager
-  :neuro #'neuro-skill-workspace-manager
-  :symbolic (lambda (action context) action))
-#+end_src

system/skills/org-skill-workspace-manager.org

@@ -0,0 +1 @@
+/home/user/memex/notes/org-skill-workspace-manager.org