doc-src/TutorialI/Misc/document/pairs.tex
author wenzelm
Mon, 23 Jun 2008 15:26:48 +0200
changeset 27319 6584901d694c
parent 17187 45bee2f6e61f
child 40406 313a24b66a8d
permissions -rw-r--r--
updated generated file;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
9722
a5f86aed785b *** empty log message ***
nipkow
parents: 9721
diff changeset
     1
%
a5f86aed785b *** empty log message ***
nipkow
parents: 9721
diff changeset
     2
\begin{isabellebody}%
9924
3370f6aa3200 updated;
wenzelm
parents: 9792
diff changeset
     3
\def\isabellecontext{pairs}%
17056
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
     4
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
     5
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
     6
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
     7
\endisadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
     8
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
     9
\isatagtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    10
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    11
\endisatagtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    12
{\isafoldtheory}%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    13
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    14
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    15
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    16
\endisadelimtheory
9541
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9145
diff changeset
    17
%
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9145
diff changeset
    18
\begin{isamarkuptext}%
11428
332347b9b942 tidying the index
paulson
parents: 10839
diff changeset
    19
\label{sec:pairs}\index{pairs and tuples}
332347b9b942 tidying the index
paulson
parents: 10839
diff changeset
    20
HOL also has ordered pairs: \isa{($a@1$,$a@2$)} is of type $\tau@1$
10538
d1bf9ca9008d *** empty log message ***
nipkow
parents: 10187
diff changeset
    21
\indexboldpos{\isasymtimes}{$Isatype} $\tau@2$ provided each $a@i$ is of type
11428
332347b9b942 tidying the index
paulson
parents: 10839
diff changeset
    22
$\tau@i$. The functions \cdx{fst} and
332347b9b942 tidying the index
paulson
parents: 10839
diff changeset
    23
\cdx{snd} extract the components of a pair:
10538
d1bf9ca9008d *** empty log message ***
nipkow
parents: 10187
diff changeset
    24
 \isa{fst($x$,$y$) = $x$} and \isa{snd($x$,$y$) = $y$}. Tuples
9933
9feb1e0c4cb3 *** empty log message ***
nipkow
parents: 9924
diff changeset
    25
are simulated by pairs nested to the right: \isa{($a@1$,$a@2$,$a@3$)} stands
9feb1e0c4cb3 *** empty log message ***
nipkow
parents: 9924
diff changeset
    26
for \isa{($a@1$,($a@2$,$a@3$))} and $\tau@1 \times \tau@2 \times \tau@3$ for
9feb1e0c4cb3 *** empty log message ***
nipkow
parents: 9924
diff changeset
    27
$\tau@1 \times (\tau@2 \times \tau@3)$. Therefore we have
9feb1e0c4cb3 *** empty log message ***
nipkow
parents: 9924
diff changeset
    28
\isa{fst(snd($a@1$,$a@2$,$a@3$)) = $a@2$}.
9541
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9145
diff changeset
    29
10539
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    30
Remarks:
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    31
\begin{itemize}
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    32
\item
11428
332347b9b942 tidying the index
paulson
parents: 10839
diff changeset
    33
There is also the type \tydx{unit}, which contains exactly one
11456
7eb63f63e6c6 revisions and indexing
paulson
parents: 11428
diff changeset
    34
element denoted by~\cdx{()}.  This type can be viewed
10539
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    35
as a degenerate product with 0 components.
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    36
\item
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    37
Products, like type \isa{nat}, are datatypes, which means
10538
d1bf9ca9008d *** empty log message ***
nipkow
parents: 10187
diff changeset
    38
in particular that \isa{induct{\isacharunderscore}tac} and \isa{case{\isacharunderscore}tac} are applicable to
10539
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    39
terms of product type.
27319
6584901d694c updated generated file;
wenzelm
parents: 17187
diff changeset
    40
Both split the term into a number of variables corresponding to the tuple structure
6584901d694c updated generated file;
wenzelm
parents: 17187
diff changeset
    41
(up to 7 components).
10539
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    42
\item
10795
9e888d60d3e5 minor edits to Chapters 1-3
paulson
parents: 10543
diff changeset
    43
Tuples with more than two or three components become unwieldy;
9e888d60d3e5 minor edits to Chapters 1-3
paulson
parents: 10543
diff changeset
    44
records are preferable.
10539
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    45
\end{itemize}
5929460a41df *** empty log message ***
nipkow
parents: 10538
diff changeset
    46
For more information on pairs and records see Chapter~\ref{ch:more-types}.%
9541
d17c0b34d5c8 *** empty log message ***
nipkow
parents: 9145
diff changeset
    47
\end{isamarkuptext}%
17175
1eced27ee0e1 updated;
wenzelm
parents: 17056
diff changeset
    48
\isamarkuptrue%
17056
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    49
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    50
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    51
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    52
\endisadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    53
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    54
\isatagtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    55
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    56
\endisatagtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    57
{\isafoldtheory}%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    58
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    59
\isadelimtheory
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    60
%
05fc32a23b8b updated;
wenzelm
parents: 13778
diff changeset
    61
\endisadelimtheory
9722
a5f86aed785b *** empty log message ***
nipkow
parents: 9721
diff changeset
    62
\end{isabellebody}%
9145
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    63
%%% Local Variables:
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    64
%%% mode: latex
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    65
%%% TeX-master: "root"
9f7b8de5bfaf updated;
wenzelm
parents: 8749
diff changeset
    66
%%% End: