The R Project SVN R

Rev

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

Rev 68947 Rev 77349
Line 30... Line 30...
30 
#include <Graphics.h>
 30 
#include <Graphics.h>
31 
#include <Print.h>
 31 
#include <Print.h>
32 
#include <R_ext/Boolean.h>
 32 
#include <R_ext/Boolean.h>
33 
 
 33 
 
34 
/* filled contours and perspective plots were originally here,
 34 
/* filled contours and perspective plots were originally here,
35 
   now in graphics/src/plot3d.c .
 35 
   now in ../library/graphics/src/plot3d.c .
36 
 */
 36 
 */
37 
 
 37 
 
38 
#include "contour-common.h"
 38 
#include "contour-common.h"
39 
 
 39 
 
40 
#define CONTOUR_LIST_STEP 100
 40 
#define CONTOUR_LIST_STEP 100
Line 64... Line 64...
64 
{
 64 
{
65 
    double xend, yend;
 65 
    double xend, yend;
66 
    int i, ii, j, jj, ns, dir, nc;
 66 
    int i, ii, j, jj, ns, dir, nc;
67 
    SEGP seglist, seg, s, start, end;
 67 
    SEGP seglist, seg, s, start, end;
68 
    SEXP ctr, level, xsxp, ysxp, names;
 68 
    SEXP ctr, level, xsxp, ysxp, names;
- 
 
 69 
/// NB: The following is very much the same as in contour() in ../library/graphics/src/plot3d.c
- 
 
 70 
 
69 
    /* Begin following contours. */
 71 
    /* Begin following contours. */
70 
    /* 1. Grab a segment */
 72 
    /* 1. Grab a segment */
71 
    /* 2. Follow its tail */
 73 
    /* 2. Follow its tail */
72 
    /* 3. Follow its head */
 74 
    /* 3. Follow its head */
73 
    /* 4. Save the contour */
 75 
    /* 4. Save the contour */