1\subsection{Join two curves at specified ends.}
2\funclabel{s1715}
3\begin{minipg1}
4  To join one end of one curve with one end of another curve by
5  translating the second curve. If {\fov curve1} is to be joined at the start,
6  the direction of the curve is turned. If {\fov curve2} is to be joined at the
7  end, the direction of this curve is turned. This means that {\fov curve1}
8  always makes the first part of the new curve.
9\end{minipg1} \\ \\
10SYNOPSIS\\
11        \>void s1715(\begin{minipg3}
12        {\fov curve1}, {\fov curve2}, {\fov end1}, {\fov end2}, {\fov newcurve}, {\fov stat})
13                \end{minipg3}\\[0.3ex]
14                \>\>    SISLCurve       \>      *{\fov curve1};\\
15                \>\>    SISLCurve       \>      *{\fov curve2};\\
16                \>\>    int     \>      {\fov end1};\\
17                \>\>    int     \>      {\fov end2};\\
18                \>\>    SISLCurve       \>      **{\fov newcurve};\\
19                \>\>    int     \>      *{\fov stat};\\
20\\
21ARGUMENTS\\
22        \>Input Arguments:\\
23        \>\>    {\fov curve1}   \> - \> First curve to join.\\
24        \>\>    {\fov curve2}   \> - \> Second curve to join.\\
25        \>\>    {\fov end1}     \> - \> \begin{minipg2}
26                                True (1) if the first curve is to be joined at the end,
27                                else false (0).
28                                \end{minipg2}\\[0.3ex]
29        \>\>    {\fov end2}     \> - \> \begin{minipg2}
30                                True (1) if the second curve is to be joined at the end,
31                                else false (0).
32                                \end{minipg2}\\[0.3ex]
33\\
34        \>Output Arguments:\\
35        \>\>    {\fov newcurve}\> - \>\begin{minipg2}
36                                The new joined curve.
37                                \end{minipg2}\\
38        \>\>    {\fov stat}     \> - \> Status messages\\
39                \>\>\>\>\>              $> 0$   : warning\\
40                \>\>\>\>\>              $= 0$   : ok\\
41                \>\>\>\>\>              $< 0$   : error\\
42\newpagetabs
43EXAMPLE OF USE\\
44                \>      \{ \\
45                \>\>    SISLCurve       \>      *{\fov curve1};\\
46                \>\>    SISLCurve       \>      *{\fov curve2};\\
47                \>\>    int     \>      {\fov end1};\\
48                \>\>    int     \>      {\fov end2};\\
49                \>\>    SISLCurve       \>      *{\fov newcurve};\\
50                \>\>    int     \>      {\fov stat};\\
51                \>\>    \ldots \\
52        \>\>s1715(\begin{minipg4}
53                {\fov curve1}, {\fov curve2}, {\fov end1}, {\fov end2}, \&{\fov newcurve}, \&{\fov stat});
54                        \end{minipg4}\\
55                \>\>    \ldots \\
56                \>      \}
57\end{tabbing}
58