This is a test post.
This post is not supposed to contain any useful information. I'm just testing the platform.
Here is some source code:
(defun render-op-list (stream maxima-sym displayed-sym exprs) (with-aligned-rendering (stream) (iterate-exprs (expr exprs maxima-sym :first-sym first) (unless first (aligned-spacing 0.2) (render-aligned-string "~a" displayed-sym) (aligned-spacing 0.2)) (render-aligned () (render-maxima-expression stream expr)))))