13 extern unsigned long imap[16];
29 float x[5],y[5],
xx[5],
yy[5];
30 int line_style,cap_style,join_style;
32 int xint,yint,dup_flag[5];
41 fm=pow(2,(
double)(
iscale-1));
88 XSetLineAttributes(
display,
gc,line_width,line_style,cap_style,join_style);
101 for(mm=0;mm<4;mm++) {
103 if(
value[mm] < mintop)
106 if(
value[mm] > maxtop)
117 if(telim < mintop || telim > maxtop)
124 if((telim >=
value[m] &&
125 telim <
value[m+1]) ||
127 telim >=
value[m+1])) {
146 if(x[h]==x[pnum] && y[h]==y[pnum])
153 for(kk=0;kk<3;kk++) {
157 for(mm=0;mm<4;mm++) {
185 if(dup_flag[kk]==0) {
204 if(pnum != 2 && pnum != 4)
212 for(
k=0;
k<pnum;
k++) {
222 for(
k=0;
k<pnum;
k++) {
230 for(
k=0;
k<pnum;
k++) {
245 if(telim <
value[1]) {
267 line_style=LineSolid;
269 join_style=JoinMiter;
271 XSetLineAttributes(
display,
gc,line_width,line_style,cap_style,join_style);
void contour_isoh(Pixmap pixm, int h, int display_flag)