src/util/rlux.csh

#!/bin/csh -f
# SCCSid "$SunId$ LBL"
#
# Compute illuminance from ray origin and direction
#
if ( $#argv < 1 ) then
        echo "Usage: $0 [rtrace args] octree"
        exit 1
endif
rtrace -i+ -dv- -h- -x 1 $argv[*]:q | rcalc -e '$1=47.4*$1+120*$2+11.6*$3' -u
Revision:	2.4
Committed:	Fri Aug 25 13:47:58 1995 UTC (29 years, 8 months ago) by greg
Content type:	application/x-csh
Branch:	MAIN
Changes since 2.3:	+1 -1 lines
Log Message:	correction for new primaries
#	Content
1	#!/bin/csh -f
2	# SCCSid "$SunId$ LBL"
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