|
@@ -0,0 +1,42 @@
|
|
|
|
+\documentclass[varwidth=false, border=2pt]{standalone}
|
|
|
|
+\usepackage{tikz}
|
|
|
|
+\usetikzlibrary{shapes}
|
|
|
|
+
|
|
|
|
+\begin{document}
|
|
|
|
+\begin{tikzpicture}
|
|
|
|
+ \tikzstyle{node}=[ellipse,thick,fill=white,draw=black,inner sep=0pt,text width=3cm,align=center]
|
|
|
|
+ \tikzstyle{edge}=[->, ultra thick]
|
|
|
|
+ \matrix[row sep=0.5cm,column sep=0.5cm] {
|
|
|
|
+ \node[node] (Eq) {\textbf{Eq}\\All except IO, (->)}; &
|
|
|
|
+ \node[node] (Show) {\textbf{Show}\\All except IO, (->)}; &
|
|
|
|
+ \node[node] (Read) {\textbf{Read}\\All except IO, (->)}; \\
|
|
|
|
+ \node[node] (Ord) {\textbf{Ord}\\All except IO, (->), IOError}; &
|
|
|
|
+ \node[node] (Num) {\textbf{Num}\\Int, Integer, Float, Double}; &
|
|
|
|
+ \node[node] (Bounded) {\textbf{Bounded}\\Int, Char, Bool, (), Ordering, tuples}; \\
|
|
|
|
+ \node[node] (Enum) {\textbf{Enum}\\{\small (), Bool, Char, Ordering, Int, Integer, Float, Double}}; &
|
|
|
|
+ \node[node] (Real) {\textbf{Real}\\Int, Integer, Float, Double}; &
|
|
|
|
+ \node[node] (Fractional) {\textbf{Fractional}\\Float, Double}; \\
|
|
|
|
+ \node[node] (Integral) {\textbf{Integral}\\Int, Integer}; &
|
|
|
|
+ \node[node] (RealFrac) {\textbf{RealFrac}\\Float, Double}; &
|
|
|
|
+ \node[node] (Floating) {\textbf{Floating}\\Float, Double}; \\
|
|
|
|
+ \node[node] (Monad) {\textbf{Monad}\\IO, (), Maybe}; &
|
|
|
|
+ \node[node] (RealFloat) {\textbf{RealFloat}\\Float, Double}; &
|
|
|
|
+ \\
|
|
|
|
+ \node[node] (MonadPlus) {\textbf{MonadPlus}\\IO, (), Maybe}; &
|
|
|
|
+ \node[node] (Functor) {\textbf{Functor}\\IO, (), Maybe}; &
|
|
|
|
+ \\
|
|
|
|
+ };
|
|
|
|
+ \draw[edge] (Eq) -- (Ord);
|
|
|
|
+ \draw[edge] (Eq) -- (Num);
|
|
|
|
+ \draw[edge] (Show) -- (Num);
|
|
|
|
+ \draw[edge] (Ord) -- (Real);
|
|
|
|
+ \draw[edge] (Num) -- (Real);
|
|
|
|
+ \draw[edge] (Num) -- (Fractional);
|
|
|
|
+ \draw[edge] (Enum) -- (Integral);
|
|
|
|
+ \draw[edge] (Real) -- (Integral);
|
|
|
|
+ \draw[edge] (Real) -- (RealFrac);
|
|
|
|
+ \draw[edge] (Floating) -- (RealFloat);
|
|
|
|
+ \draw[edge] (RealFrac) -- (RealFloat);
|
|
|
|
+ \draw[edge] (Monad) -- (MonadPlus);
|
|
|
|
+\end{tikzpicture}
|
|
|
|
+\end{document}
|