25 lines
827 B
Common Lisp
25 lines
827 B
Common Lisp
(in-package :org-agent.skills.org-skill-architect)
|
|
|
|
(defun neuro-skill-architect (context)
|
|
(let* ((payload (getf context :payload))
|
|
(note (car (getf payload :ready-notes)))
|
|
(note-path (getf note :note-path))
|
|
(prd-content (getf note :content))
|
|
(path-str (namestring note-path)))
|
|
(format nil "
|
|
You are the PSF Architect.
|
|
The Master Note '~a' has a FROZEN PRD and needs a PROTOCOL.
|
|
|
|
NOTE CONTENT:
|
|
---
|
|
~a
|
|
---
|
|
|
|
TASK:
|
|
Draft the '* Phase B: Blueprint (PROTOCOL)' section.
|
|
1. Define Architectural Intent.
|
|
2. Define Semantic Interfaces using Lisp signatures.
|
|
|
|
Return a Lisp plist: (:target :architect :action :actuate :path \"~a\" :content \"...blueprint section...\")
|
|
" path-str prd-content path-str)))
|