% (find-angg "LATEX/2018-1-GA-conicas.tex")
% (defun c () (interactive) (find-LATEXsh "lualatex -record 2018-1-GA-conicas.tex"))
% (defun d () (interactive) (find-xpdfpage "~/LATEX/2018-1-GA-conicas.pdf"))
% (defun b () (interactive) (find-zsh "bibtex 2018-1-GA-conicas; makeindex 2018-1-GA-conicas"))
% (defun e () (interactive) (find-LATEX "2018-1-GA-conicas.tex"))
% (defun u () (interactive) (find-latex-upload-links "2018-1-GA-conicas"))
% (find-xpdfpage "~/LATEX/2018-1-GA-conicas.pdf")
% (find-sh0 "cp -v  ~/LATEX/2018-1-GA-conicas.pdf /tmp/")
% (find-sh0 "cp -v  ~/LATEX/2018-1-GA-conicas.pdf /tmp/pen/")
%   file:///home/edrx/LATEX/2018-1-GA-conicas.pdf
%               file:///tmp/2018-1-GA-conicas.pdf
%           file:///tmp/pen/2018-1-GA-conicas.pdf
% http://angg.twu.net/LATEX/2018-1-GA-conicas.pdf


% «.mypsection»	(to "mypsection")
%
% «.conicas»	(to "conicas")
%
% «.indice»	(to "indice")


\documentclass[oneside]{book}
\usepackage[colorlinks]{hyperref} % (find-es "tex" "hyperref")
%\usepackage[latin1]{inputenc}
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage{pict2e}
\usepackage{color}                % (find-LATEX "edrx15.sty" "colors")
\usepackage{colorweb}             % (find-es "tex" "colorweb")
%\usepackage{tikz}
%
% (find-dn6 "preamble6.lua" "preamble0")
%\usepackage{proof}   % For derivation trees ("%:" lines)
%\input diagxy        % For 2D diagrams ("%D" lines)
%\xyoption{curve}     % For the ".curve=" feature in 2D diagrams
%
\usepackage{edrx15}               % (find-angg "LATEX/edrx15.sty")
\input edrxaccents.tex            % (find-angg "LATEX/edrxaccents.tex")
\input edrxchars.tex              % (find-LATEX "edrxchars.tex")
\input edrxheadfoot.tex           % (find-dn4ex "edrxheadfoot.tex")
\input edrxgac2.tex               % (find-LATEX "edrxgac2.tex")
%
\begin{document}

\catcode`\^^J=10
\directlua{dednat6dir = "dednat6/"}
\directlua{dofile(dednat6dir.."dednat6.lua")}
\directlua{texfile(tex.jobname)}
\directlua{verbose()}
%\directlua{output(preamble1)}
\def\expr#1{\directlua{output(tostring(#1))}}
\def\eval#1{\directlua{#1}}
\def\pu{\directlua{pu()}}

\directlua{dofile "edrxtikz.lua"} % (find-LATEX "edrxtikz.lua")
\directlua{dofile "edrxpict.lua"} % (find-LATEX "edrxpict.lua")
%L V.__tostring = function (v) return format("(%.3f,%.3f)", v[1], v[2]) end





% «mypsection» (to ".mypsection")
% (find-LATEX "2018-1-GA-material.tex" "mypsection")
% (find-angg ".emacs" "eewrap-mypsection")
% (find-es "tex" "page-numbers")
% (find-es "tex" "protect")
%L psections = {}
%L psectionstex = function ()
%L     local f = function(A)
%L         return format("\\mypsectiontex{%s}{%s}", A[1], A[2])
%L       end
%L     return mapconcat(f, psections, "\n")
%L   end
\def\mypsectiontex#1#2{\par\pageref{#1} #2}
\def\mypsectionstex{\expr{psectionstex()}}
\pu
\def\mypsectionadd#1#2{\directlua{table.insert(psections, {"#1", [[#2]]})}}
\def\mypsection   #1#2{\label{#1}{\bf #2}\mypsectionadd{#1}{#2}\ssk}





\newpage

%   ____            _               
%  / ___|___  _ __ (_) ___ __ _ ___ 
% | |   / _ \| '_ \| |/ __/ _` / __|
% | |__| (_) | | | | | (_| (_| \__ \
%  \____\___/|_| |_|_|\___\__,_|___/
%                                   
% «conicas» (to ".conicas")
% (gac181p 1 "conicas")
\mypsection {conicas} {Cônicas}

% (find-angg ".emacs" "gaq172")
% (find-angg ".emacs" "gaq172" "nicas")
% (gaq172 31 "20171127" "cônicas")




\newpage



% «indice» (to ".indice")

\directlua{PPV(psections)}
\mypsectionstex






\end{document}

% Local Variables:
% coding: utf-8-unix
% End: