Ejemplo de uso de condicionales para definir un nuevo Macro

              
%% -------------------------------------------------------------------------
%% Esta es un ejemplo de cómo utilizar casos condicionales para evaluar
%% las diferentes opciones de un parámetro de entrada en un nuevo macro 
%% personalizado, en este ejemplo se condiciona el tipo intervalo que se
%% representa de acuerdo a si se trata de un intervalo infinito o no y
%% si es abierto o cerrado.
%% -------------------------------------------------------------------------
%% 2017 por Fausto M. Lagos S. <piratax007@protonmail.ch>
%% 
%% Este trabajo puede ser distribuido o modificado bajo los
%% términos y condiciones de la LaTeX Project Public License (LPPL) v1.3C, 
%% o cualquier versión posterior. La última versión de esta licencia
%% puede verse en:
%% http://www.latex-project.org/lppl.txt
%% 
%% Usted es libre de usarlo, modificarlo o distribuirlo siempre que se
%% respeten los términos de la licencia y se reconozca al autor original
%% ----------------------------------------------------------------------

\documentclass{article}
\usepackage[utf8]{inputenc}
\usepackage[spanish]{babel}
\usepackage[margin=.5in]{geometry}
\usepackage{amsmath,amssymb}
\usepackage{graphicx}
\usepackage{tikz}
\usetikzlibrary{babel, shapes}
\usepackage{paracol}
\usepackage{xcolor}
\usepackage{xstring}

% Colores
\definecolor{myBlue}{HTML}{027FDF}
\definecolor{negative}{HTML}{181818}
\definecolor{positive}{HTML}{AA3939}

% Recta Real
\newcommand{\reaLine}[2]{
    \node (li) at (#1 - 1.5, 0) {};
    \node (ls) at (#2 + 1.5, 0) {$\mathbb{R}$};
	\draw [<->] (li) -- (ls);
}

%----------------------------------------------------
% Intervalo
% #1 cota inferior
% #2 cota superior
% #3 posición vertical del intervalo
% #4 fill o fill = none o <-, tipo de cota
% #5 fill o fill = none o ->, tipo de cota
% #6 nonInf o inf, tipo de intervalo
\newcommand{\interval}[7]{
    \IfEqCase {#6}{
        {nonInf}{
        \node [circle, draw, #4, line width = 1.5pt, color = #7, inner sep = 0pt, minimum size = 5pt] (ci) at (#1, #3) {};
        \node [circle, draw, #5, line width = 1.5pt, color = #7, inner sep = 0pt, minimum size = 5pt] (cs) at (#2, #3) {};
        \draw [line width = 1.5pt, color = #7] (ci) -- (cs);
        \draw (ci) -- (#1, -.2);
        \node (tag) at (#1, -.4) {#1};
        \draw (cs) -- (#2, -.2);
        \node (tag) at (#2, -.4) {#2};
        }
        {inf}{
        	\IfEqCase {#4}{
            	{<-}{
			        \node [circle, draw, #5, line width = 1.5pt, color = #7, inner sep = 0pt, minimum size = 5pt] (cs) at (#2, #3) {};
                    \draw [#4, line width = 1.5pt, color = #7] (#1 - 1.5, #3) -- (cs);
                    \draw (cs) -- (#2, -.2);
                    \node (tag) at (#2, -.4) {#2};
                }
                {->}{
                	\node [circle, draw, #5, line width = 1.5pt, color = #7, inner sep = 0pt, minimum size = 5pt] (ci) at (#1, #3) {};
                    \draw [->, line width = 1.5pt, color = #7] (ci) -- (#2 + 1.5, #3);
                    \draw (ci) -- (#1, -.2);
                    \node (tag) at (#1, -.4) {#1};
                }
            }
        }
        }[\PackageError{tree}{Undefined option to intervals: #6}{}]
}
%----------------------------------------------------

\begin{document}
	\begin{paracol}{2}
		\begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{<-}{fill = none}{inf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{<-}{fill}{inf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{->}{fill = none}{inf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{->}{fill}{inf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{fill = none}{fill = none}{nonInf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{fill}{fill}{nonInf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{fill = none}{fill}{nonInf}{myBlue}
		\end{tikzpicture}
        \switchcolumn
        \begin{tikzpicture}
			\reaLine{-1}{2}
            \interval{-1}{2}{.3}{fill}{fill = none}{nonInf}{myBlue}
		\end{tikzpicture}
	\end{paracol}
\end{document}