tests: fix dead test suite (export list, stale duplicates, 14/14 pass)

org/programming-standards.org

@@ -47,13 +47,13 @@ Run the appropriate chaos tier before reflecting code back to Org:
 **** Phase E: Reflect Back to Org
 1. Copy the working function into its own ~#+begin_src lisp~ block in the Org file
 2. Update the prose to match what the function actually does (arguments, return, rationale)
-3. Before closing Phase E, run ~(utils-lisp-validate (uiop:read-file-string "path/to/file.lisp") :strict t)~ in the REPL — never external scripts or manual paren-counting
+3. Before closing Phase E, run ~(lisp-validate (uiop:read-file-string "path/to/file.lisp") :strict t)~ in the REPL — never external scripts or manual paren-counting
 4. Verify the Org file tangles correctly
 5. Tangle, commit, update GTD
 
 **** Syntax Error Protocol
 If a LOADER ERROR or reader-error occurs:
-1. Run ~(utils-lisp-validate (uiop:read-file-string "file.lisp") :strict t)~ in the REPL — never Python, never grep, never manual counting
+1. Run ~(lisp-validate (uiop:read-file-string "file.lisp") :strict t)~ in the REPL — never Python, never grep, never manual counting
 2. Fix the error in the Org file (since the code was prototyped in REPL first, this should be rare)
 3. Retangle and re-evaluate
 
@@ -104,7 +104,7 @@ CLOSED: [2026-05-02 Sat 18:00]
 #+begin_src lisp
 (defun standards-lisp-verify (code)
   "Enforces Lisp structural and semantic standards using utils-lisp."
-  (let ((result (utils-lisp-validate code :strict t)))
+  (let ((result (lisp-validate code :strict t)))
     (if (eq (getf result :status) :success)
         t
         (error (getf result :reason)))))
@@ -115,7 +115,7 @@ CLOSED: [2026-05-02 Sat 18:00]
 #+begin_src lisp
 (defun standards-lisp-format (code)
   "Ensures Lisp code adheres to formatting standards."
-  (utils-lisp-format code))
+  (lisp-format code))
 #+end_src
 #+end_src