<div>I like it. To be honest, I use TeXShop and don't generally deal with command-line utilities, but that's okay. There is a manual. :)</div> <div> </div> <div>Right now, I'm working on a matrix algebra module, and I'd like to be able to work with rings of polynomials, exponential polynomials and so forth, but it would be nice to display the output to the the user in some comprehensible format. For now, I'm thinking about just displaying unprocessed LaTeX and worrying about typesetting later.<br> <br></div> <div class="gmail_quote">On Tue, Dec 2, 2008 at 3:21 PM, Anthony Cowley <span dir="ltr"><<a href="mailto:acowley@seas.upenn.edu">acowley@seas.upenn.edu</a>></span> wrote:<br> <blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">Here's a version of Mark's code that does the processing locally. It<br>needs some attention regarding the system calls depending on your<br> setup, as it calls pdflatex and convert (ImageMagick) as well as<br>creates a couple temporary files.<br><br>;;; Create an image snip object from a latex equation.<br>;;; Technique from<br><a href="http://dererumnatura.us/archives/2008/02/rendering-equat-1.html" target="_blank">http://dererumnatura.us/archives/2008/02/rendering-equat-1.html</a><br> <div class="Ih2E3d">#lang scheme<br>(require scheme/system)<br>(require scheme/gui/base)<br>(define latex<br></div> (let ((template-head (string-join  '("\\documentclass{article}"<br>                                      "\\usepackage{amsmath}"<br>                                       "\\pagestyle{empty}"<br>                                      "\\begin{document}"<br>                                      "\\Huge"<br>                                      "\\[")<br>                                     "~n"))<br>       (template-foot (string-join '("\\]"<br>                                     "\\end{document}")<br>                                   "~n")))<br>    (lambda (str)<br>     (call-with-output-file "/tmp/latex.tex"<br>       (lambda (f) (fprintf f (string-join (list template-head str<br>template-foot) "~n")))<br>       #:mode 'text<br>       #:exists 'replace)<br>      (system "PATH=/sw/bin:$PATH pdflatex -output-directory /tmp<br>latex.tex > /dev/null")<br>     (system "PATH=/sw/bin:$PATH convert /tmp/latex.pdf -trim +repage<br>/tmp/latex.png")<br>     (make-object image-snip% "/tmp/latex.png"))))<br> <br>;; Example<br>; (latex "\\sum_{i=0}^{\\infty}\\lambda_i")<br><font color="#888888"><br>Anthony<br></font> <div> <div></div> <div class="Wj3C7c"><br>On Tue, Dec 2, 2008 at 4:32 PM, Mark Engelberg <<a href="mailto:mark.engelberg@gmail.com">mark.engelberg@gmail.com</a>> wrote:<br>> BTW, my code looks like this:<br>> #lang scheme<br>> (require scheme/system)<br> > (require scheme/gui/base)<br>> (define (latex str)<br>>  (let ([escaped-str (regexp-replace* #rx" " str "%20")])<br>>    (system (format "C:\\temp\\curl<br>> \"<a href="http://www.codecogs.com/eq.latex?~a\" target="_blank">http://www.codecogs.com/eq.latex?~a\</a>" -o C:\\temp\\latex.gif"<br> > escaped-str))<br>>    (make-object image-snip% "c:\\temp\\latex.gif")))<br>><br>> I keep the curl executable in my temp directory.<br>><br>> So you can do something like (latex "3 \\geq 2") and it will produce<br> > the latex output for that.<br>><br>> While it's downloading the latex gif, the repl displays a read input<br>> box.  I'm not sure how to suppress that.<br></div></div> <div> <div></div> <div class="Wj3C7c">> _________________________________________________<br>>  For list-related administrative tasks:<br>>  <a href="http://list.cs.brown.edu/mailman/listinfo/plt-scheme" target="_blank">http://list.cs.brown.edu/mailman/listinfo/plt-scheme</a><br> ><br></div></div></blockquote></div><br>