| author | wenzelm |
| Mon, 17 Dec 2012 14:07:34 +0100 | |
| changeset 50575 | ae1da46022d1 |
| parent 48985 | 5386df44a037 |
| child 58860 | fee7cfa69c50 |
| permissions | -rw-r--r-- |
(*<*) theory pairs2 imports Main begin; (*>*) text{*\label{sec:pairs}\index{pairs and tuples} HOL also has ordered pairs: \isa{($a@1$,$a@2$)} is of type $\tau@1$ \indexboldpos{\isasymtimes}{$Isatype} $\tau@2$ provided each $a@i$ is of type $\tau@i$. The functions \cdx{fst} and \cdx{snd} extract the components of a pair: \isa{fst($x$,$y$) = $x$} and \isa{snd($x$,$y$) = $y$}. Tuples are simulated by pairs nested to the right: \isa{($a@1$,$a@2$,$a@3$)} stands for \isa{($a@1$,($a@2$,$a@3$))} and $\tau@1 \times \tau@2 \times \tau@3$ for $\tau@1 \times (\tau@2 \times \tau@3)$. Therefore we have \isa{fst(snd($a@1$,$a@2$,$a@3$)) = $a@2$}. Remarks: \begin{itemize} \item There is also the type \tydx{unit}, which contains exactly one element denoted by~\cdx{()}. This type can be viewed as a degenerate product with 0 components. \item Products, like type @{typ nat}, are datatypes, which means in particular that @{text induct_tac} and @{text case_tac} are applicable to terms of product type. Both split the term into a number of variables corresponding to the tuple structure (up to 7 components). \item Tuples with more than two or three components become unwieldy; records are preferable. \end{itemize} For more information on pairs and records see Chapter~\ref{ch:more-types}. *} (*<*) end (*>*)