Back to index

radiance  4R0+20100331
chanvalue.c
Go to the documentation of this file.
00001 #ifndef lint
00002 static const char    RCSid[] = "$Id: chanvalue.c,v 3.3 2003/07/17 09:21:29 schorsch Exp $";
00003 #endif
00004 /*
00005  * Dummy definition of chanvalue() for calcomp routines.
00006  */
00007 
00008 #include "rterror.h"
00009 #include "calcomp.h"
00010 
00011 double
00012 chanvalue(int n)
00013 {
00014        eputs("Call to unsupported chanvalue routine\n");
00015        quit(1);
00016        return 0.0; /* pro forma return */
00017 }