\begin{flushleft}
\hrulefill

\vspace*{-4mm}

\begin{alltt}
STk> (define h (graph '(1 2 3) '((1) (2 3) (1 2 3)))){\em{
\#[undefined]} }
\end{alltt}
\begin{alltt}
STk> (describe h){\em{
\#[\(<\)uhypergraph*\(>\) \#p4f944c] is an instance of class \(<\)uhypergraph*\(>\)
Slots are: 
     val = \{[1 2 3]  \{\{1\} \{1 2 3\} \{2 3\}\}\}
\#f} }
\end{alltt}

\vspace*{-5mm}

\hrulefill
\end{flushleft}