% (find-LATEX "2020draw-on-tree.tex")
% (defun c () (interactive) (find-LATEXsh "lualatex -record 2020draw-on-tree.tex" :end))
% (defun D () (interactive) (find-pdf-page      "~/LATEX/2020draw-on-tree.pdf"))
% (defun d () (interactive) (find-pdftools-page "~/LATEX/2020draw-on-tree.pdf"))
% (defun e () (interactive) (find-LATEX "2020draw-on-tree.tex"))
% (defun u () (interactive) (find-latex-upload-links "2020draw-on-tree"))
% (defun v () (interactive) (find-2a '(e) '(d)) (g))
% (find-pdf-page   "~/LATEX/2020draw-on-tree.pdf")
% (find-sh0 "cp -v  ~/LATEX/2020draw-on-tree.pdf /tmp/")
% (find-sh0 "cp -v  ~/LATEX/2020draw-on-tree.pdf /tmp/pen/")
%   file:///home/edrx/LATEX/2020draw-on-tree.pdf
%               file:///tmp/2020draw-on-tree.pdf
%           file:///tmp/pen/2020draw-on-tree.pdf
% http://angg.twu.net/LATEX/2020draw-on-tree.pdf
% (find-LATEX "2019.mk")
% (code-etex "dot" "2020draw-on-tree")

\documentclass[oneside,12pt]{article}
\usepackage[colorlinks,citecolor=DarkRed,urlcolor=DarkRed]{hyperref} % (find-es "tex" "hyperref")
\usepackage{amsmath}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage{pict2e}
\usepackage[x11names,svgnames]{xcolor} % (find-es "tex" "xcolor")
%\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-LATEX "edrx15.sty")
\input edrxaccents.tex            % (find-LATEX "edrxaccents.tex")
\input edrxchars.tex              % (find-LATEX "edrxchars.tex")
\input edrxheadfoot.tex           % (find-LATEX "edrxheadfoot.tex")
\input edrxgac2.tex               % (find-LATEX "edrxgac2.tex")
%
%\usepackage[backend=biber,
%   style=alphabetic]{biblatex}            % (find-es "tex" "biber")
%\addbibresource{catsem-slides.bib}        % (find-LATEX "catsem-slides.bib")
%
% (find-es "tex" "geometry")
\begin{document}

\catcode`\^^J=10
\directlua{dofile "dednat6load.lua"}  % (find-LATEX "dednat6load.lua")




%:
%:                               x,y|Pxy,Qx,Rx⊢Sx
%:                               ----------------(→I)
%:                               x,y|Pxy,Qx⊢Rx→Sx
%:                               ------------------(→I)
%:                               x,y|Pxy⊢Qx→(Rx→Sx)
%:                               -------------------(∃R)
%:                               x|∃y.Pxy⊢Qx→(Rx→Sx)
%:                               -------------------(→E)
%:   x,y|Pxy,Qx,Rx⊢Sx            x|∃y.Pxy,Qx⊢Rx→Sx
%:   -----------------(∃E)       -----------------(→E)
%:   x|∃y.Pxy,Qx,Rx⊢Sx           x|∃y.Pxy,Qx,Rx⊢Sx
%:
%:   ^ExE-1                      ^ExE-2
%:
%:
%:
%:                                            [Pxy]^3  [Qx]^2  [Rx]^1
%:                                            :::::::::::::::::::::::
%:                                                       Sx
%:                                                     -----(→I);1
%:                                                     Rx→Sx
%:                                                  ----------(→I);2
%:                                        ∃y.Pxy    Qx→(Rx→Sx)
%:                                        ---------------------(∃R);3
%:           [Pxy]^1  Qx  Rx         Qx      Qx→(Rx→Sx)
%:           :::::::::::::::         ------------------(→E)
%:   ∃y.Pxy         Sx           Rx    Rx→Sx
%:   -----------------(∃E);1     -----------(→E)
%:          Sx                        Sx
%:
%:          ^ExE-1-ND                 ^ExE-2-ND
%:
%:
%:
\pu
$$\ded{ExE-1-ND} \quad ⇒ \quad \ded{ExE-2-ND}$$
$$\ded{ExE-1}    \quad ⇒ \quad \ded{ExE-2}$$


\ded{ExE-2-ND}
% (find-dn6 "diagforth.lua" "BOX")

% (find-angg ".emacs.templates" "find-latexinkscape-links")
% (find-latexinkscape-links "2020draw-on-tree/ExE-ND-blobs")
\includegraphics[width=2cm]{2020draw-on-tree/ExE-ND-blobs.pdf}


\end{document}

%  __  __       _        
% |  \/  | __ _| | _____ 
% | |\/| |/ _` | |/ / _ \
% | |  | | (_| |   <  __/
% |_|  |_|\__,_|_|\_\___|
%                        
% <make>

 (eepitch-shell)
 (eepitch-kill)
 (eepitch-shell)
# (find-LATEXfile "2019planar-has-1.mk")
make -f 2019.mk STEM=2020draw-on-tree veryclean
make -f 2019.mk STEM=2020draw-on-tree pdf

% Local Variables:
% coding: utf-8-unix
% ee-tla: "dot"
% End:
