The R Project SVN R-packages

Rev

Rev 2125 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2125 Rev 4722
Line 1... Line 1...
1
#include "threeDplot.h"
1
#include "threeDplot.h"
2
 
2
 
3
 
3
 
4
 
4
 
5
 
5
 
-
 
6
static void 
6
static void calculate_angles(double *x, double *y, double *z,
7
calculate_angles(double *x, double *y, double *z,
7
			     double *ls, double *misc, 
8
		 double *ls, double *misc, 
8
			     double distance)
9
		 double distance)
9
{
10
{
10
 
11
 
11
    double x1, x2, y1, y2, z1, z2, len;
12
    double x1, x2, y1, y2, z1, z2, len;
12
    double xl, yl, zl, xe, ye, ze; /* light source and eye  */ 
13
    double xl, yl, zl, xe, ye, ze; /* light source and eye  */ 
13
    double xn, yn, zn, xr, yr, zr; /* normal and reflected ray */ 
14
    double xn, yn, zn, xr, yr, zr; /* normal and reflected ray */