1 #!/bin/csh -f

     2 # RCSid: $Id: rlux.csh,v 2.5 2003/02/22 02:07:30 greg Exp $

     3 #

     4 # Compute illuminance from ray origin and direction

     5 #

     6 if ( $#argv < 1 ) then

     7 	echo "Usage: $0 [rtrace args] octree"

     8 	exit 1

     9 endif

    10 rtrace -i+ -dv- -h- -x 1 $argv[*]:q | rcalc -e '$1=47.4*$1+120*$2+11.6*$3' -u