Add boxedgraphic macro to display a metapost graphic with a border.

[matthijs/master-project/report.git] / Utils / Lambda.tex

diff --git a/Utils/Lambda.tex b/Utils/Lambda.tex
index 8854ccad1c06ed5950078e426dc64ae36f05f391..2172bbc38d0c1c42a1b01c255fe5b2a4c0d82146 100644 (file)
--- a/Utils/Lambda.tex
+++ b/Utils/Lambda.tex
@@ -57,3 +57,24 @@ draw b;
 \definetyping[haskell][option=HASKELL,before=\startboxed,after=\stopboxed]
 % Define \hs
 \definetype[hs][option=HASKELL,style=mono]
+
+% Type the given buffer with the lambda typing style.
+% e.g., \typebufferlam{buffname}
+\define[1]\typebufferlam{
+  % We can't use \startlambda here defined by definetyping[lambda] above when
+  % typing buffers, so instead we'll redfine the options here.
+  \setuptyping[option=LAM,style=sans,before=,after=]
+  \startboxed
+  \typebuffer[#1]
+  \stopboxed
+  % Reset the typing options
+  \setuptyping[option=none,style=\tttf]
+}
+
+% Display a useMPgraphic in a pretty box
+\define[1]\boxedgraphic{
+  \startboxed
+  \useMPgraphic{#1}
+  \stopboxed
+}
+