\begin{flushleft}
\hrulefill

\vspace*{-4mm}

\begin{alltt}
STk> (define s (set-int 1 2 3)){\em{
\#[undefined]} }
\end{alltt}
\begin{alltt}
STk> (define bin-edges (choose s 2)){\em{
\#[undefined]} }
\end{alltt}
\begin{alltt}
STk> (define hyper-edges (power-set s)){\em{
\#[undefined]} }
\end{alltt}
\begin{alltt}
STk> (describe bin-edges){\em{
\#[\(<\)set\(<\)set\(<\)int*\(>\)\(>\)\(>\) \#p5027d0] is an instance of class \(<\)set\(<\)set\(<\)int*\(>\)\(>\)\(>\)
Slots are: 
     val = \{\{1 2\} \{1 3\} \{2 3\}\}
\#f} }
\end{alltt}
\begin{alltt}
STk> (describe hyper-edges){\em{
\#[\(<\)set\(<\)set\(<\)int*\(>\)\(>\)\(>\) \#p501d80] is an instance of class \(<\)set\(<\)set\(<\)int*\(>\)\(>\)\(>\)
Slots are: 
     val = \{\{\} \{1\} \{1 2\} \{1 2 3\} \{1 3\} \{2\} \{2 3\} \{3\}\}
\#f} }
\end{alltt}

\vspace*{-5mm}

\hrulefill
\end{flushleft}