summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/metapost/mpcolornames/proof-mpcolornames.mp
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mpcolornames/proof-mpcolornames.mp')
-rw-r--r--Master/texmf-dist/doc/metapost/mpcolornames/proof-mpcolornames.mp28
1 files changed, 28 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/metapost/mpcolornames/proof-mpcolornames.mp b/Master/texmf-dist/doc/metapost/mpcolornames/proof-mpcolornames.mp
new file mode 100644
index 00000000000..563dcd1d864
--- /dev/null
+++ b/Master/texmf-dist/doc/metapost/mpcolornames/proof-mpcolornames.mp
@@ -0,0 +1,28 @@
+%%% file proof-mpcolornames.mp
+%%% Copyright 2009,2011 Stephan Hennig
+%
+% This work may be distributed and/or modified under the conditions of
+% the LaTeX Project Public License, either version 1.3 of this license
+% or (at your option) any later version. The latest version of this
+% license is in http://www.latex-project.org/lppl.txt
+%
+input mpcolornames
+
+boxh := 7.5bp;
+boxw := 12.5bp;
+penw := .3bp;
+string specname;
+
+def colorbox=
+ unitsquare xscaled boxw yscaled boxh
+enddef;
+
+def proof(suffix col)=
+ outputtemplate := "proof-spec-" & specname & "-" & str col & ".mps";
+ beginfig(1);
+ fill colorbox withcolor col;
+ draw colorbox withpen pencircle scaled penw;
+ endfig;
+enddef;
+
+endinput