summaryrefslogtreecommitdiff
path: root/macros/luatex/generic/minim/minim-doc.sty
diff options
context:
space:
mode:
Diffstat (limited to 'macros/luatex/generic/minim/minim-doc.sty')
-rw-r--r--macros/luatex/generic/minim/minim-doc.sty215
1 files changed, 215 insertions, 0 deletions
diff --git a/macros/luatex/generic/minim/minim-doc.sty b/macros/luatex/generic/minim/minim-doc.sty
new file mode 100644
index 0000000000..1d3c2d4cea
--- /dev/null
+++ b/macros/luatex/generic/minim/minim-doc.sty
@@ -0,0 +1,215 @@
+
+%% This is the style file for the manuals of the minim format and related
+%% packages.
+
+\ifdefined \manual
+ \expandafter\endinput\fi
+
+\input minim
+
+\pdfalevel 3a
+\overfullrule = 0pt
+
+% 1 page layout
+
+\pdfvariable horigin 0pt
+\pdfvariable vorigin 0pt
+\frenchspacing
+\raggedbottom
+
+\uselanguage{ukenglish}
+\hyphenation {
+ mark-tab-le-cell
+ }
+
+\parindent 0pt
+\baselineskip 12pt plus 1pt
+\parskip 8pt plus 4pt minus 1pt
+
+\abovedisplayskip 3pt plus 2pt
+\belowdisplayskip 4pt plus 2pt
+
+\hsize 12cm
+\vsize 56\baselineskip
+
+\voffset = \dimexpr (\pageheight-\vsize)/2\relax
+\hoffset = \dimexpr (\pagewidth-\hsize)/2\relax
+
+% 1 fonts
+
+\input luaotfload.sty
+\font\tenrm {Latin Modern Roman:script=latn;protrusion=default} at 10pt
+\font\tenbf {Latin Modern Roman/B:script=latn} at 10pt
+\font\tenit {Latin Modern Roman/I:script=latn} at 10pt
+\font\tentt {Latin Modern Mono:script=latn;+smcp} at 10pt
+\font\title {Latin Modern Roman/B:script=latn} at 12pt
+\font\Title {Latin Modern Roman/B:script=latn} at 16pt
+
+\font\tenmath {Latin Modern Math:mode=base;script=math;ssty=0} at 10pt
+\font\tenmaths {Latin Modern Math:mode=base;script=math;ssty=1} at 7pt
+\font\tenmathss {Latin Modern Math:mode=base;script=math;ssty=2} at 5pt
+\textfont 0 = \tenmath
+\scriptfont 0 = \tenmaths
+\scriptscriptfont 0 = \tenmathss
+
+\font\altmath {Tex Gyre Pagella Math:mode=base;script=math;ssty=0} at 10pt
+\font\altmaths {Tex Gyre Pagella Math:mode=base;script=math;ssty=1} at 7pt
+\font\altmathss {Tex Gyre Pagella Math:mode=base;script=math;ssty=2} at 5pt
+\textfont 1 = \altmath
+\scriptfont 1 = \altmaths
+\scriptscriptfont 1 = \altmathss
+
+\expandglyphsinfont \tenrm 40 25 5
+\protrudechars=2 \adjustspacing=2
+\tenrm
+
+\mathfam{blackboard, `\mscra-`\mscrz} 1
+
+% 1 code typesetting
+
+\def\red#1{\quitvmode\pdfextension
+ literal{0.75 0 0 rg}{#1}\pdfextension literal{0 g}}
+
+\def\emph#1{{\tenit #1\/}}
+
+\def\breakablespace{\penalty0~}
+\catcode`\⟦=\active
+\def⟦{\quitvmode\begingroup\catcode`\∥=0\relax
+ \markparagraphsfalse
+ \def\do##1{\catcode`##1=12}\dospecials
+ \catcode`\ =\active
+ \letcharcode`\ =\breakablespace\obeylines
+ \parskip0pt\tentt
+ \nextif*{\verbatim\ignore}{\expandafter\ignore\verbatim}}
+\def\verbatim#1⟧{\red{\markelement{Code}{#1}}\endgroup}
+
+% 1 the minim symbol
+
+\newbox\notehead
+\newmetapostinstance \mnmMP
+\runmetapost \mnmMP {
+beginfig(1)
+ w:=1/27; pickup pencircle scaled 1/9;
+ path c; c :=
+ (-3/5,-1/6 ) {down}..
+ (-1/5,-1/2 ) {right}..
+ ( 3/5, 1/6 ) {up}..
+ ( 1/5, 1/2 ) {left}.. cycle;
+ filldraw c withcolor .75 red;
+ path p; p :=
+ (-0.383-w,-0.323-w) ..tension 1.35.. (-0.094-w, 0.094+w) ..tension 1.5..
+ ( 0.383+w, 0.323+w) ..tension 1.35.. ( 0.094+w,-0.094-w) ..tension 1.5.. cycle ;
+ p := (-1,-1) -- (1,-1) -- (1,1) -- p -- (1,1) -- (-1,1) -- cycle ;
+ clip currentpicture to p;
+ draw (3/5, 1/6) -- (3/5, 5/2) withcolor .75 red;
+ setbounds currentpicture to c;
+ currentpicture := currentpicture scaled 8pt ;
+endfig;}
+\boxnextmpimage \mnmMP \notehead
+\setbox\notehead=\hbox{\markartifact{Layout}{\box\notehead}}
+\closemetapostinstance \mnmMP
+
+%
+% 1 document structure
+
+% page artifacts
+\edef\tmp{\markartifact{Pagination /Subtype/Footer}{\the\footline}}
+\footline\expandafter{\tmp}
+\def\footnoterule{\markartifact{Layout}{\kern-3\p@
+ \hrule width 2truein \kern 2.6\p@}} % the \hrule is .4pt high
+
+% \startlist \item x. ... \stoplist
+\def\listskip{\vskip 3pt plus 2pt\vskip-\parskip}
+\def\startlist{\smallskip\startelement{L}}
+\def\stoplist{\stopelement{L}\smallskip}
+\def\item#1.{\listskip
+ \nextpartag{LI}\hangindent2em\quitvmode
+ \hbox to 2em{\hss\startelement{Lbl}#1.~~}%
+ \startelement{LBody}\ignorespaces}
+
+% \chapter Title \par
+\addstructuretype Sect Chapter
+\protected\def\chapter#1 \par{%
+ \vfil\break
+ \ensurestopelement{Section}%
+ \startelement{Chapter}%
+ \outline open {#1}%
+ \nextpartag{H}\red{\Title#1\hfill\copy\notehead}%
+ \addtotoc{\chapter{#1}{\lastdestinationname}}%
+ \bigskip}
+
+% \section Title \par
+\addstructuretype Sect Section
+\protected\def\section#1 \par{%
+ \bigskip\penalty-50\relax
+ \startelement{Section}%
+ \outline closed {#1}%
+ \nextpartag{H}\quitvmode
+ \addtotoc{\section{#1}{\lastdestinationname}}%
+ \red{\title#1}%
+ \par\nobreak}
+
+% table of contents
+\newtoks\toc \newif\iftoc \toctrue
+\def\addtotoc#1{%
+ \iftoc \edef\toctmp{#1}%
+ \write\auxfile\expandafter
+ {\expandafter\toksapp\expandafter\toc
+ \expandafter{\toctmp{\the\count0}}}\fi\toctrue}
+
+% an auxiliary file
+\newread \auxfile
+\immediate\openin\auxfile = \jobname.aux
+\ifeof\auxfile
+ \def\next{}\else
+ \def\next{\input \jobname.aux}\fi
+\immediate\closein\auxfile \next
+\newwrite \auxfile
+\immediate\openout\auxfile = \jobname.aux
+
+\autotagformulas
+
+\def\maketitle{%
+ \setembeddedfilesmoddate {\getmetadata date}
+ \begingroup
+ \def\outline##1##{\ignore}
+ \tocfalse \chapter \getmetadata title
+ \hfill \tenrm version \getmetadata version
+ \par\endgroup
+ \marktableaslist \halign {\strut
+ \qquad##\quad&##\hfil\cr
+ author&\getmetadata author\cr
+ contact&{\def\tmp{@}\def\TMP{.}%
+ minim\tmp elrenkema\TMP nl}\cr}
+ \smallskip}
+
+% 1 Chapters and full manuals
+
+\def\licencesection{\section Licence
+
+\embedfile global file {EUPL-1.2-EN.txt}
+ desc {Licence for this package (EUPL).}
+ name LICENCE mimetype text/plain
+ relation Unspecified uncompressed
+
+This package may be distributed under the terms of the European Union Public
+Licence (EUPL) version 1.2 or later. An english version of this licence has
+been included as an attachment to this file; copies in other languages can be
+obtained at
+\stopformulatagging$$\hbox
+{\hyperlink url {https://joinup.ec.europa.eu/collection/eupl/eupl-text-eupl-12}%
+https://joinup.ec.europa.eu/collection/eupl/eupl-text-eupl-12\endlink}$$\startformulatagging}
+
+
+% for identifying which file we are typesetting
+\edef\thejobname{\expandafter\scantextokens\expandafter{\jobname}}
+\newif \ifchapter
+\def\manual#1{\def\tmp{#1}\ifx\thejobname\tmp
+ \chapterfalse\else\chaptertrue\fi}
+\def\endmanual{\ifchapter\expandafter\endinput\else
+ \licencesection\expandafter\bye\fi}
+
+%  introduction
+
+\endinput
+