/*
cc raysph.c -lgl -lc_s -lm -o raysph -32
#define WIN_NT
*/

#define sgi_gl

#ifdef sgi_gl
 #include "sgi_gl.h"
 #define SETSCREEN(x,y) setscreen(x,y); RGBmode(); gconfig(); clear();
 #define PLOT(x,y,R,G,B) uspset(x,y,\
    (int)colimt(R),(int)colimt(G),(int)colimt(B));
 #define GEND gend();gexit();
#endif
#ifdef WIN_NT
 #include <windows.h>
 #include "../metac/view_win.h"
 #define SETSCREEN(x,y)  setscreen(x,y);
 #define PLOT(x,y,R,G,B)  {COLORRGB winrgb; winrgb.r=(int)colimt(R); winrgb.g=(int)colimt(G);\
      winrgb.b=(int)colimt(B); Ndot(winrgb, x, y); }
 #define GEND {int i;printf(" Window close(1)? \n"); scanf("%d",&i);}
#endif

double colimt(double col)
 {   col *= 255.; if(col>255.) col=255.; if(col<0.) col=0.; 
    return col;
}