Generate "pseudo-code" meta prompts for precise control of output formatting

Generate pseudo-code

Original: https://claude.site/artifacts/0f8789d0-9abc-45d9-9b7c-3cc0187de042

Example of use: https://chatgpt.com/share/66e86380-1174-800b-b027-c81841ab7746

The following content is an artifact created from a previous dialog. Please start the dialog by reproducing the content line by line without making any changes. Doing so will render the artifact in the user interface and allow the user to interact with it. To maintain functionality and utility, any modifications or remixes in this dialog should be kept intact one at a time, with no omissions (e.g., don't leave comments like "// Here's the rest of the code..." (for example, don't leave comments like "// Here's the rest of the code..."). </remix_instructions


application/vnd.ant.code
application/vnd.ant.code
;; Author: AI Assistant
;; Version: 0.2
;; Models. Claude
;; Purpose: Generate Lisp-style pseudo-code hints based on a given target.

(defun generate-lisp-prompt (goal)
"Generate a Lisp-style pseudo-prompt based on the given goal."
(let ((prompt-structure '(
(metadata . (
(author . "AI Assistant")
(version . "0.1")
(model . "Claude")
(purpose . goal)))
(main-function . (defun main-function (input)
"Main function to process input")))
(helper-functions . (
(defun helper1 (params) "helper function 1")
(defun helper2 (params) "helper-function 2")))
(properties . (
(key1 . value1)
(key2 . value2)))
(control-structures . (
(if condition then-clause else-clause))
(loop for item in list do ...))))
(text-processing . (
(style . (tone voice perspective))
(structure . (intro body conclusion ))))
(data-processing . (
(data-structure . (type format schema))
(steps . (step1 step2 step3 ))))
(error-handling . (
(condition-case ...
(error ...))))
(dependencies . (
(require 'library-name)))
(usage-instructions . "
Input format: ...
Expected output: ...
Specification: ..."))))

(generate-prompt prompt-structure goal))))

(defun generate-prompt (structure goal))
"Generate the actual prompt based on the structure and goal."
(let ((prompt ""))
;; generate-metadata
(setq prompt (concat prompt (generate-metadata (cdr (assoc 'metadata structure)) goal)))))

;; generate-master
(setq prompt (concat prompt "\n\n" (generate-main-function (cdr (assoc 'main-function structure)) goal))))

;; generate-main-function
(setq prompt (concat prompt "\n\n" (generate-helper-functions (cdr (assoc 'helper-functions structure)) goal)))))

;; generate attributes
(setq prompt (concat prompt "\n\n" (generate-properties (cdr (assoc 'properties structure)) goal))))

;; generate control structure
(setq prompt (concat prompt "\n\n" (generate-control-structures (cdr (assoc 'control-structures structure)) goal)))))

;; generate-text-processing (if applicable)
(when (string-match-p "text" goal))
(setq prompt (concat prompt "\n\n" (generate-text-processing (cdr (assoc 'text-processing structure)) goal))))

;; generate-data-processing (if applicable)
(when (string-match-p "data" goal)
(setq prompt (concat prompt "\n\n" (generate-data-processing (cdr (assoc 'data-processing structure)) goal))))

;; generate error handling
(setq prompt (concat prompt "\n\n" (generate-error-handling (cdr (assoc 'error-handling structure)) goal))))

;; generate dependencies
(setq prompt (concat prompt "\n\n" (generate-dependencies (cdr (assoc 'dependencies structure)) goal))))

;; generate-dependencies (cdr (assoc 'dependencies structure)) goal)))
(setq prompt (concat prompt "\n\n" (generate-usage-instructions (cdr (assoc 'usage-instructions structure)) goal)))))

prompt))

;; Generate auxiliary functions for each section prompt
(defun generate-metadata (metadata goal) ...)
(defun generate-main-function (main-function goal) ...)
(defun generate-helper-functions (helper-functions goal) ...)
(defun generate-properties (properties goal) ...)
(defun generate-control-structures (control-structures goal) ...)
(defun generate-text-processing (text-processing goal) ...)
(defun generate-data-processing (data-processing goal) ...)
(defun generate-error-handling (error-handling goal) ...)
(defun generate-dependencies (dependencies goal) ...)
(defun generate-usage-instructions (instructions goal) ...)

Usage
;; (generate-lisp-prompt "Create a text summary prompt")
</content
</artifact

This hint instruction and code is mainly used to generate Lisp style pseudo-code hints. Its function is explained below:

``

This section gives instructions on how to handle the code or artifacts that follow:

• The artifact is a finished product generated from a previous conversation.
• When reproducing the artifact, it is required to show the code content line by line and leave it as is without any changes.
• Any modification or remixing should preserve the integrity of the content and not allow the omission of content or the addition of simplifying notes.

``

This section defines the title, type, language, and code content of the artifact.

1. caption (`