diff options
Diffstat (limited to 'macros/latex/contrib/euclideangeometry/euclideangeometry-man.tex')
-rw-r--r-- | macros/latex/contrib/euclideangeometry/euclideangeometry-man.tex | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/macros/latex/contrib/euclideangeometry/euclideangeometry-man.tex b/macros/latex/contrib/euclideangeometry/euclideangeometry-man.tex index ab35cdb93d..01ee2978b3 100644 --- a/macros/latex/contrib/euclideangeometry/euclideangeometry-man.tex +++ b/macros/latex/contrib/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)}} |