% $Id: test-smithlogo.tex 1 2021-05-15 22:12:05Z reinhard $

% Copyright (C) 2020 Reinhard Kotucha <reinhard.kotucha@web.de>
% 
% You may freely use, modify, and/or distribute this file.

\def\uncompressed{
  \pdfvariable minorversion 4
  \pdfvariable compresslevel 0
  \pdfvariable objcompresslevel 0
}

\uncompressed

\input luagraphlib
\luagraphicfile{smithchart.lua}  % Smithcharts

\pdfextension info {
  /Author (Reinhard Kotucha)
  /Title (Smith Chart)
  /Creator (LuaTeX with luagraphlib)
  /Subject (Smith Chart)
}

\directlua{default = {
    smithchart = {
      radius = 20,
      reso = 'logo',
      arclinewidth = 1,
      circlelinewidth = 1,
      circlecolor = {.5, 0, 0},
      bgcolor = {1, 1, .75},
      layer = 'fg',
      lambda = function (a) return a[2], a[3] end,
      Z = {
        fg = {
          arccolor = {.5, 0, 0},
        },
        bg = {
          arccolor = {1, .8, .8},
        },
      },
    } % no comma here!
  }
}

\parindent=0pt
\pdfvariable horigin=0pt
\pdfvariable vorigin=0pt
\pagewidth=41mm
\pageheight=\pagewidth
\hoffset=0pt
\voffset=0pt

\begindocument

\begin{canvas}(\pagewidth, \pageheight)
  \at(\w/2, \h/2){\luagraphic{smithbackground()}}
  \at(\w/2, \h/2){\luagraphic{smithchart_Z()}}
\end{canvas}

\bye

% Local Variables:
%  mode: TeX
%  TeX-master: t
%  TeX-engine: luatex
%  indent-tabs-mode: nil
%  coding: utf-8-unix
% End:
% vim:set tabstop=2 expandtab: