summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2020-02-11 22:09:57 +0000
committerKarl Berry <karl@freefriends.org>2020-02-11 22:09:57 +0000
commit5e49fa64bd451d499e66784df6f9a437f8b3ab71 (patch)
tree4fea1aaf853d931143a85d054f7386e69d05882e /Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex
parentd2da7f5f40ade904cccb2e82630d15bd42520ff5 (diff)
euclideangeometry (11feb20)
git-svn-id: svn://tug.org/texlive/trunk@53757 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex')
-rw-r--r--Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex37
1 files changed, 37 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex b/Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex
index ab35cdb93db..01ee2978b3f 100644
--- a/Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex
+++ b/Master/texmf-dist/doc/latex/euclideangeometry/euclideangeometry-man.tex
@@ -97,8 +97,45 @@ g\raisebox{-0.715ex}{\kern-0.26em u}\kern-0.13em\I\kern-0.14em t}\xspace}
\def\hz{\hskip0pt}
+\makeatletter
+\newwrite\example@out
+\newlength\Wboxu \newlength\Wboxd
+
+\DeclareDocumentEnvironment{Esempio}{ O{\normalsize} D(){0.40}}
+{\par\addvspace{3.0ex plus 0.8ex minus 0.5ex}\vskip -\parskip
+\Wboxu=#2\textwidth\relax
+\Wboxd=\dimexpr\linewidth-\columnsep-\Wboxu\relax
+\begingroup
+\@bsphack
+\immediate\openout\example@out\jobname-temp.tex
+\let\do\@makeother\dospecials\catcode`\^^M\active
+\def\verbatim@processline{%
+ \immediate\write\example@out{\the\verbatim@line}}%
+\verbatim@start\relax}%
+{\immediate\closeout\example@out\@esphack\endgroup
+\begin{lrbox}{0}%
+\begin{minipage}{\textwidth}%
+\begin{minipage}{\Wboxu}%
+#1\relax
+\verbatiminput{\jobname-temp.tex}
+\end{minipage}%
+\hfill
+\begin{minipage}{\Wboxd}\raggedleft
+\input{\jobname-temp}%
+\end{minipage}
+\end{minipage}%
+\end{lrbox}%
+\medskip
+\noindent\makebox[\textwidth]{\box0}%
+\par\addvspace{3.0ex plus 0.8ex minus 0.5ex}\vskip -\parskip
+}
+\makeatother
+\newenvironment{ttsintassi}{\begin{lrbox}{0}
+\minipage{\dimexpr\linewidth-2\fboxrule-2\fboxsep}\ttfamily\obeylines}%
+{\endminipage\end{lrbox}\center\fbox{\box0}\endcenter}
+\let\ttsyntax\ttsintassi \let\endttsyntax\endttsintassi
\newcommand\heart[3]{%
\edef\X{\fpeval{#1*16*(sind(#2)^3)}}