1CPCLTR(3NCARG) NCAR GRAPHICS CPCLTR(3NCARG)
2
3
4
6 CPCLTR - Traces the contour lines at a given level and retrieves them
7 for some sort of user-defined processing.
8
10 CALL CPCLTR (ZDAT,RWRK,IWRK,CLVL,IJMP,IRW1,IRW2,NRWK)
11
13 #include <ncarg/ncargC.h>
14
15 void c_cpcltr (float *zdat, float *rwrk, int *iwrk,
16 float clvl, int *ijmp, int *irw1, int *irw2, int *nrwk)
17
19 The first three arguments are arrays used in the last call to CPRECT,
20 CPSPS1, or CPSPS2, the contents of which must not have been changed
21 since that call.
22
23 ZDAT (REAL array, dimensioned as specified in the last call to
24 CPRECT, CPSPS1, or CPSPS2, input) is the data array.
25
26 RWRK (REAL array, dimensioned as specified in the last call to
27 CPRECT, CPSPS1, or CPSPS2, input/output) is the real
28 workspace array.
29
30 IWRK (INTEGER array, dimensioned as specified in the last call
31 to CPRECT, CPSPS1, or CPSPS2, input/output) is the integer
32 workspace array.
33
34 CLEV (REAL, input) is the desired contour level.
35
36 IJMP (INTEGER, input/output) is initially set to zero by the
37 user. Upon return from CPCLTR, it will be non-zero if
38 coordinates of a contour line segment have been placed in
39 RWRK; it will be zero if all contour line segments at the
40 given level have been generated.
41
42 IRW1 (INTEGER, output) is a pointer to the place in RWRK where X
43 coordinates have been stored. They will be in RWRK(IRW1+I)
44 for I = 1, 2, ..., NRWK.
45
46 IRW2 (INTEGER, output) is a pointer to the place in RWRK where Y
47 coordinates have been stored. They will be in RWRK(IRW2+I)
48 for I = 1, 2, ..., NRWK.
49
50 NRWK (INTEGER, output) is the number of points on the contour
51 line segment. The points comprising the segment will be
52 (RWRK(IRW1+I),RWRK(IRW2+I)) for I = 1, 2, ... NRWK.
53
55 The C-binding argument descriptions are the same as the FORTRAN
56 argument descriptions.
57
59 The routine CPCLTR may be called at any time after the initialization
60 call to CPRECT, CPSPS1, or CPSPS2. It is called using code like the
61 following:
62
63 IJMP=0
64 101 CALL CPCLTR (ZDAT,RWRK,IWRK,CLEV,IJMP,IRW1,IRW2,NRWK)
65 IF (IJMP.NE.0) THEN
66 (PROCESS SEGMENT OF CONTOUR LINE FROM RWRK)
67 GO TO 101
68 END IF
69
70 CPCLTR is called repeatedly. Initially, IJMP is zeroed. Upon each
71 return from CPCLTR, if the value of IJMP is non-zero, X and Y
72 coordinates have been placed in the real workspace array RWRK and the
73 values of IRW1, IRW2, and NRWK have been set to indicate where the
74 coordinates were put. After the coordinates have been processed,
75 CPCLTR is called again. If, upon return from CPCLTR, the value of IJMP
76 is zero, all contour lines at the specified level have been processed.
77
78 If the parameter 'T2D' has a non-zero value, the contour lines are
79 smoothed, using cubic splines under tension.
80
82 To use CPCLTR or c_cpcltr, load the NCAR Graphics libraries ncarg,
83 ncarg_gks, and ncarg_c, preferably in that order.
84
86 See the conpack man page for a description of all Conpack error
87 messages and/or informational messages.
88
90 Online: conpack, cpback, cpchcf, cpchcl, cpchhl, cpchil, cpchll,
91 cpcica, cpclam, cpcldm, cpcldr, cpcnrc, cpdrpl, cpezct, cpgetc, cpgeti,
92 cpgetr, cplbam, cplbdr, cpmpxy, cpmviw, cpmvrw, cppkcl, cppklb, cprect,
93 cprset, cpscae, cpsetc, cpseti, cpsetr, cpsps1, cpsps2, ncarg_cbind
94
96 Copyright (C) 1987-2007
97 University Corporation for Atmospheric Research
98
99 This documentation is free software; you can redistribute it and/or
100 modify it under the terms of the GNU General Public License as
101 published by the Free Software Foundation; either version 2 of the
102 License, or (at your option) any later version.
103
104 This software is distributed in the hope that it will be useful, but
105 WITHOUT ANY WARRANTY; without even the implied warranty of
106 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
107 General Public License for more details.
108
109 You should have received a copy of the GNU General Public License along
110 with this software; if not, write to the Free Software Foundation,
111 Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
112
113
114
115
116UNIX March 1993 CPCLTR(3NCARG)