33 #define STDCALL __stdcall
68 const char *yopt,
PLFLT *ytick,
PLINT *nysub );
70 const char *yopt,
const char *ylabel,
PLFLT *ytick,
PLINT *nysub,
71 const char *zopt,
const char *zlabel,
PLFLT *ztick,
PLINT *nzsub );
87 void PLCONFIGTIME(
PLFLT *scale,
PLFLT *offset1,
PLFLT *offset2,
PLINT *ccontrol,
PLBOOL *ifbtime_offset,
PLINT *year,
PLINT *month,
PLINT *day,
PLINT *hour,
PLINT *
min,
PLFLT *sec );
109 void PLGDEV7(
char *dev,
int length );
116 void PLGFNAM7(
char *fnam,
int length );
142 void PLLAB7(
const char *xlab,
const char *ylab,
const char *title );
150 PLFLT *text_justification,
151 const PLINT *text_colors,
152 const PLINT *box_colors,
const PLINT *box_patterns,
153 const PLFLT *box_scales,
const PLFLT *box_line_widths,
154 const PLINT *line_colors,
const PLINT *line_styles,
155 const PLFLT *line_widths,
156 const PLINT *symbol_colors,
const PLFLT *symbol_scales,
157 const PLINT *symbol_numbers );
162 void PLMAP7(
const char *type,
207 void PLSDEV7(
const char *dev );
214 void PLSEED(
unsigned int *s );
234 void PLSPAL07(
const char *filename );
248 void PLSTRIPC(
PLINT *
id,
const char *xspec,
const char *yspec,
254 const char *legline0,
const char *legline1,
255 const char *legline2,
const char *legline3,
256 const char *labx,
const char *laby,
const char *labtop );
282 ( *pltransform )( &
x, &
y, tx, ty );
324 c_plarc( *x, *y, *a, *b, *angle1, *angle2, *rotate, *fill );
331 c_plaxes( *x0, *y0, xopt, *xtick, *nxsub, yopt, *ytick, *nysub );
337 c_plbin( *nbin, x, y, *center );
343 c_plbtime( year, month, day, hour, min, sec, *ctime );
354 const char *yopt,
PLFLT *ytick,
PLINT *nysub )
356 c_plbox( xopt, *xtick, *nxsub, yopt, *ytick, *nysub );
361 const char *yopt,
const char *ylabel,
PLFLT *ytick,
PLINT *nysub,
362 const char *zopt,
const char *zlabel,
PLFLT *ztick,
PLINT *nzsub )
364 c_plbox3( xopt, xlabel, *xtick, *nxsub,
365 yopt, ylabel, *ytick, *nysub,
366 zopt, zlabel, *ztick, *nzsub );
415 a = (
PLFLT **) malloc(
sizeof (
PLFLT * ) * ( *n_axes ) );
416 for ( i = 0; i < *n_axes; i++ )
418 a[i] = (
PLFLT *) malloc(
sizeof (
PLFLT ) * n_values[i] );
419 for ( j = 0; j < n_values[i]; j++ )
421 a[i][j] = values[i + j * ( *n_axes )];
426 *opt, *position, *x, *y,
427 *x_length, *y_length,
428 *bg_color, *bb_color, *bb_style,
429 *low_cap_color, *high_cap_color,
430 *cont_color, *cont_width,
434 n_values, (
const PLFLT *
const *) a );
439 for ( i = 0; i < *n_axes; i++ )
447 PLCONFIGTIME(
PLFLT *scale,
PLFLT *offset1,
PLFLT *offset2,
PLINT *ccontrol,
PLBOOL *ifbtime_offset,
PLINT *year,
PLINT *month,
PLINT *day,
PLINT *hour,
PLINT *
min,
PLFLT *sec )
449 c_plconfigtime( *scale, *offset1, *offset2, *ccontrol, *ifbtime_offset, *year, *month, *day, *hour, *min, *sec );
461 c_plctime( *year, *month, *day, *hour, *min, *sec, ctime );
480 c_plenv( *xmin, *xmax, *ymin, *ymax, *just, *axis );
487 c_plenv0( *xmin, *xmax, *ymin, *ymax, *just, *axis );
653 c_plgpage( xpmm, ypmm, xwid, ywid, xoff, yoff );
701 c_plgvpd( p_xmin, p_xmax, p_ymin, p_ymax );
707 c_plgvpw( p_xmin, p_xmax, p_ymin, p_ymax );
732 c_plhist( *n, data, *datmin, *datmax, *nbin, *oldwin );
741 #endif // PL_DEPRECATED
761 for ( i = 0; i < *
nx; i++ )
763 for ( j = 0; j < *
ny; j++ )
765 pidata[i][j] = idata[i + j * ( *nx )];
770 *xmin, *xmax, *ymin, *ymax, *zmin, *zmax,
771 *Dxmin, *Dxmax, *Dymin, *Dymax,
772 *valuemin, *valuemax );
788 for ( i = 0; i < *
nx; i++ )
790 for ( j = 0; j < *
ny; j++ )
792 pidata[i][j] = idata[i + j * ( *nx )];
797 *xmin, *xmax, *ymin, *ymax, *zmin, *zmax,
798 *Dxmin, *Dxmax, *Dymin, *Dymax );
816 PLLAB7(
const char *xlab,
const char *ylab,
const char *title )
829 ( *pllabelfunc )( &axis, &
value,
label, &length, length );
833 while ( ( i >= 0 ) && ( label[i] ==
' ' ) )
850 p_string = (
char **) malloc(
sizeof (
char * ) * (size_t) ( *number ) );
851 data = (
char *) malloc(
sizeof (
char * ) * (size_t) ( ( *number ) * ( length + 1 ) ) );
853 for ( j = 0; j < ( *number ); j++ )
855 p_string[j] = data + j * ( length + 1 );
856 memcpy( p_string[j], &
string[j * length], (
size_t) length );
857 p_string[j][length] =
'\0';
859 while ( ( i >= 0 ) && ( p_string[j][i] ==
' ' ) )
861 p_string[j][i + 1] =
'\0';
887 PLFLT *p_legend_width,
PLFLT *p_legend_height,
893 PLFLT *text_justification,
894 const PLINT *text_colors,
895 const PLINT *box_colors,
const PLINT *box_patterns,
896 const PLFLT *box_scales,
const PLFLT *box_line_widths,
897 const PLINT *line_colors,
const PLINT *line_styles,
898 const PLFLT *line_widths,
899 const PLINT *symbol_colors,
const PLFLT *symbol_scales,
900 const PLINT *symbol_numbers )
903 *opt, *position, *x, *y, *plot_width,
904 *bg_color, *bb_color, *bb_style,
907 *text_offset, *text_scale, *text_spacing,
910 box_colors, box_patterns,
911 box_scales, box_line_widths,
912 line_colors, line_styles,
914 symbol_colors, symbol_scales,
950 ( *plmapform )( &n,
x,
y );
961 c_plmap( NULL, type, *minlong, *maxlong, *minlat, *maxlat );
972 c_plmeridians( NULL, *dlong, *dlat, *minlong, *maxlong, *minlat, *maxlat );
984 c_plmtex( side, *disp, *pos, *just, text );
990 c_plmtex3( side, *disp, *pos, *just, text );
998 if ( *numargs <= MAXARGS )
1002 for ( i = 0; i < *numargs; i++ )
1004 argv[i] = iargs + ( i * *maxindex );
1010 fprintf( stderr,
"plparseopts7: numargs too large\n" );
1052 c_plptex( *x, *y, *dx, *dy, *just, text );
1062 c_plptex3( *x, *y, *z, *dx, *dy, *dz, *sx, *sy, *sz, *just, text );
1077 #ifdef PL_DEPRECATED
1081 c_plrgb( *red, *green, *blue );
1083 #endif // PL_DEPRECATED
1085 #ifdef PL_DEPRECATED
1091 #endif // PL_DEPRECATED
1139 c_plscmap1l( *itype, *npts, intensity, coord1, coord2, coord3, alt_hue_path );
1146 c_plscmap1l( *itype, *npts, intensity, coord1, coord2, coord3, NULL );
1153 c_plscmap1la( *itype, *npts, intensity, coord1, coord2, coord3, a, alt_hue_path );
1160 c_plscmap1la( *itype, *npts, intensity, coord1, coord2, coord3, a, NULL );
1227 c_plsdimap( *dimxmin, *dimxmax, *dimymin, *dimymax,
1228 *dimxpmm, *dimypmm );
1250 PLSEED(
unsigned int *s )
1263 #define PLSETMAPFORMC FNAME( PLSETMAPFORMC, plsetmapformc )
1264 #define PLCLEARMAPFORMC FNAME( PLCLEARMAPFORMC, plclearmapformc )
1315 pllabelfunc = labelfunc;
1323 pllabelfunc = labelfunc;
1390 c_plspage( *xpmm, *ypmm, *xwid, *ywid, *xoff, *yoff );
1444 pltransform = transformfunc;
1491 const char *legline0,
const char *legline1,
1492 const char *legline2,
const char *legline3,
1493 const char *labx,
const char *laby,
const char *labtop )
1495 const char* legline[4];
1496 legline[0] = legline0;
1497 legline[1] = legline1;
1498 legline[2] = legline2;
1499 legline[3] = legline3;
1502 *xmin, *xmax, *xjump, *ymin, *ymax,
1506 colline, styline, legline,
1507 labx, laby, labtop );
1525 c_plsvect( arrowx, arrowy, *npts, *fill );
1531 c_plsvpa( *xmin, *xmax, *ymin, *ymax );
1579 c_plvpas( *xmin, *xmax, *ymin, *ymax, *aspect );
1585 c_plvpor( *xmin, *xmax, *ymin, *ymax );
1600 c_plw3d( *basex, *basey, *height,
1601 *xmin, *xmax, *ymin, *ymax, *zmin, *zmax, *alt, *az );
1613 c_plwind( *xmin, *xmax, *ymin, *ymax );