% pgflibraryam.code.tex (utf8 encoding) % Copyright 2020 Alain Matthes % 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 % and version 1.3 or later is part of all distributions of LaTeX % version 2005/12/01 or later. % % This work has the LPPL maintenance status “maintained”. % % The Current Maintainer of this work is Alain Matthes. % Original idea of F Fradin and H Voss \typeout{2020/04/06 1.1 pgflibraryam.code.tex} \makeatletter % dimensions des motifs \def\@pgfornamentDim#1{% dim en bp \ifcase#1\relax% \or\def\@pgfornamentX{136}\def\@pgfornamentY{107}% 1 \or\def\@pgfornamentX{133}\def\@pgfornamentY{48}% 2 \or\def\@pgfornamentX{133}\def\@pgfornamentY{48}% 2 \fi% }% % appels des motifs \def\pgf@@ornament#1{% \begingroup \def\i{\pgfusepath{clip}} \let\o\pgfpathclose \let\s\pgfusepathqfillstroke \def\p ##1##2{\pgfqpoint{##1bp}{##2bp}} \def\m ##1 ##2 {\pgfpathmoveto{\p{##1}{##2}}} \def\l ##1 ##2 {\pgfpathlineto{\p{##1}{##2}}} \def\r ##1 ##2 ##3 ##4 {\pgfpathrectangle{\p{##1}{##2}}{\p{##3}{##4}}} \def\c ##1 ##2 ##3 ##4 ##5 ##6 {% \pgfpathcurveto{\p{##1}{##2}}{\p{##3}{##4}}{\p{##5}{##6}}}% \@@input am#1.pgf %\@nameuse{pgf@@am@#1}% \endgroup}% \makeatother \endinput