(in-package :org-agent) (defun economist-route-task (context) (declare (ignore context)) '(:openrouter)) (defun economist-get-model-for-provider (provider &optional context) "Returns 100% Free/Subsidized model IDs from OpenRouter. Updated April 2026." (let ((complexity (ignore-errors (uiop:symbol-call :org-agent.skills.org-skill-router :router-classify-complexity context)))) (case provider (:openrouter (case complexity (:REASONING "meta-llama/llama-3.3-70b-instruct:free") ; High fidelity, zero cost (:COGNITION "qwen/qwen3.6-plus:free") ; Latest interaction, zero cost (t "meta-llama/llama-3.2-3b-instruct:free"))) ; Ultra-fast reflex, zero cost (t nil))))