The R Project SVN R

Rev

Rev 47460 | Rev 50746 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 47460 Rev 50745
Line 779... Line 779...
779
 * Apart from here, used in package clines.
779
 * Apart from here, used in package clines.
780
 */
780
 */
781
SEXP GEcontourLines(double *x, int nx, double *y, int ny,
781
SEXP GEcontourLines(double *x, int nx, double *y, int ny,
782
		    double *z, double *levels, int nl)
782
		    double *z, double *levels, int nl)
783
{
783
{
784
    void *vmax;
784
    const void *vmax;
785
    int i, nlines, len;
785
    int i, nlines, len;
786
    double atom, zmin, zmax;
786
    double atom, zmin, zmax;
787
    SEGP* segmentDB;
787
    SEGP* segmentDB;
788
    SEXP container, mainlist, templist;
788
    SEXP container, mainlist, templist;
789
    /*
789
    /*
Line 1345... Line 1345...
1345
    int i, j, nx, ny, nc, ncol, nlty, nlwd;
1345
    int i, j, nx, ny, nc, ncol, nlty, nlwd;
1346
    int ltysave, lwdsave, fontsave = 1 /* -Wall */;
1346
    int ltysave, lwdsave, fontsave = 1 /* -Wall */;
1347
    rcolor colsave;
1347
    rcolor colsave;
1348
    double cexsave;
1348
    double cexsave;
1349
    double atom, zmin, zmax;
1349
    double atom, zmin, zmax;
-
 
1350
    const void *vmax, *vmax0;
1350
    char *vmax, *vmax0, familysave[201];
1351
    char familysave[201];
1351
    int method;
1352
    int method;
1352
    Rboolean drawLabels;
1353
    Rboolean drawLabels;
1353
    double labcex;
1354
    double labcex;
1354
    pGEDevDesc dd = GEcurrentDevice();
1355
    pGEDevDesc dd = GEcurrentDevice();
1355
    SEXP result = R_NilValue;
1356
    SEXP result = R_NilValue;