Package: radiance
Version: 3R9+20080530-3
Filename: pool/main/r/radiance/radiance_3R9+20080530-3_i386.deb


Found error in /usr/bin/optics2rad:
	$ grep -A5 -B5 /tmp/ /usr/bin/optics2rad
	#
	if ($#argv < 1) then
		echo "Usage: $0 optics.mat .."
		exit 1
	endif
	cat > /tmp/opt.fmt << '_EOF_'
	void glass $(name)_glass
	0
	0
	3 ${Rtn} ${Gtn} ${Btn}
	
	--
	'_EOF_'
	
	echo "# Output generated by $0 from $*"
	sed -e '/^[^#]/d' -e '/^$/d' $*
	
	cat > /tmp/out$$.fmt << '_EOF_'
	
	void glass $(name)
	0
	0
	3 ${Rtn} ${Gtn} ${Btn}
	--
	rcalc -l -e 'abs(x):if(x,x,-x);and(a,b):if(a,b,a);not(x):if(x,-1,1)' \
		-e 'lum(r,g,b):.265*r+.670*g+.065*b' \
		-e 'trans=lum(Rtau,Gtau,Btau)' \
		-e 'rfront=lum(fRrho,fGrho,fBrho);rback=lum(bRrho,bGrho,bBrho)' \
		-e 'cond=0.005-abs(rfront-rback)' \
		-i /tmp/opt.fmt -o /tmp/out$$.fmt $*
	
	cat > /tmp/out$$.fmt << '_EOF_'
	
	void BRTDfunc $(name)
	10
		rR_clear rG_clear rB_clear
		${Rtau}*tR_clear ${Gtau}*tG_clear ${Btau}*tB_clear
	--
	rcalc -l -e 'abs(x):if(x,x,-x);and(a,b):if(a,b,a);not(x):if(x,-1,1)' \
		-e 'lum(r,g,b):.265*r+.670*g+.065*b' \
		-e 'trans=lum(Rtau,Gtau,Btau)' \
		-e 'rfront=lum(fRrho,fGrho,fBrho);rback=lum(bRrho,bGrho,bBrho)' \
		-e 'cond=and(trans-.645, not(0.005-abs(rfront-rback)))' \
		-i /tmp/opt.fmt -o /tmp/out$$.fmt $*
	
	cat > /tmp/out$$.fmt << '_EOF_'
	
	void BRTDfunc $(name)
	10
		rR_bronze rG_bronze rB_bronze
		${Rtau}*tR_bronze ${Gtau}*tG_bronze ${Btau}*tB_bronze
	--
	rcalc -l -e 'abs(x):if(x,x,-x);and(a,b):if(a,b,a);not(x):if(x,-1,1)' \
		-e 'lum(r,g,b):.265*r+.670*g+.065*b' \
		-e 'trans=lum(Rtau,Gtau,Btau)' \
		-e 'rfront=lum(fRrho,fGrho,fBrho);rback=lum(bRrho,bGrho,bBrho)' \
		-e 'cond=and(not(trans-.645), not(0.005-abs(rfront-rback)))' \
		-i /tmp/opt.fmt -o /tmp/out$$.fmt $*
	
	rm -f /tmp/opt.fmt /tmp/out$$.fmt

Found error in /usr/bin/pdelta:
	$ grep -A5 -B5 /tmp/ /usr/bin/pdelta
		set inp1='x1=X(ri(1),gi(1),bi(1));y1=Y(ri(1),gi(1),bi(1));z1=Z(ri(1),gi(1),bi(1))'
	endif
	if ( "`getinfo < $f2:q | grep '^FORMAT=32-bit_rle_xyze'`" == "" ) then
		set inp2='x2=X(ri(2),gi(2),bi(2));y2=Y(ri(2),gi(2),bi(2));z2=Z(ri(2),gi(2),bi(2))'
	endif
	pfilt -1 -x 128 -y 128 -p 1 $f1:q | pvalue -o -h -H -d > /tmp/tf$$.dat
	set wht=(`total -u /tmp/tf$$.dat`)
	set avg=`rcalc -e '$1=$2' /tmp/tf$$.dat | total -m`
	rm /tmp/tf$$.dat
	pcomb -e $cielab:q -e $rgb2xyz:q \
		-e "Yw:179*3*$avg; Xw:$wht[1]*Yw/$wht[2]; Zw:$wht[3]*Yw/$wht[2]" \
		-e $inp1:q -e $inp2:q -e 'lo=dE(x1,y1,z1,x2,y2,z2)' \
		-o $f1:q -o $f2:q

Found error in /usr/bin/dayfact:
	$ grep -A5 -B5 /tmp/ /usr/bin/dayfact
	readvar genskyf
	if ( $genskyf == $nofile ) then
		echo "You will not be able to compute daylight factors"
		echo "or energy savings since there is no gensky file."
	else
		xform -e $genskyf > /tmp/gsf$$
		grep '^# gensky ' /tmp/gsf$$
		if ( $status ) then
			echo "The file $genskyf does not contain a gensky command\!"
			rm -f /tmp/gsf$$
			goto getgenskyf
		endif
		set title=$title\ `sed -n 's/^# gensky  *\([0-9][0-9]*  *[0-9][0-9]*  *[0-9][0-9.]*\).*$/\1/p' /tmp/gsf$$`
		set extamb=`sed -n 's/^# Ground ambient level: //p' /tmp/gsf$$`
		grep -s '^# gensky .* -c' /tmp/gsf$$
		set nodaysav=$status
		rm -f /tmp/gsf$$
		if ( $nodaysav ) then
			echo "The gensky command was not done for an overcast sky"
			echo "(-c option), so energy savings cannot be calculated."
			echo -n "Continue anyway? "
			if ( "$<" =~ [nN]* ) then
	--
		echo "Since you don't want any output, I guess we're done."
		exit 0
	endif
	echo "Title for output picture"
	readvar title
	set sctemp=/tmp/sc$$.csh
	cat <<'_EOF_' > $sctemp
	if ( $illumpic != $nofile ) then
		set iltemp=""
	else
		set iltemp=/tmp/il$$.pic
		set illumpic=$iltemp
	endif
	set tltemp=/tmp/tl$$.pic
	set dstemp=/tmp/ds$$.pic
	set temp1=/tmp/tfa$$
	set tempfiles=($iltemp $sctemp $tltemp $dstemp $temp1)
	echo "Your dayfact job is finished."
	echo "Please check for error messages below."
	echo ""
	set echo

Found error in /usr/bin/raddepend:
	$ grep -A5 -B5 /tmp/ /usr/bin/raddepend
	set es=1
	onintr quit
	rm -f EMPTY
	echo -n > EMPTY
	sleep 2
	( ls $* | sed -e 's~/~\\/~g' -e 's@^@/^@' -e 's@$@$/d@' ; echo '/^EMPTY$/,$d' ) > /tmp/sed$$
	getbbox -w $* >/dev/null
	set es=$status
	if ( $es == 0 ) then
		sync
		sleep 2
		ls -tuL | sed -f /tmp/sed$$ | sort
	endif
	quit:
	rm -f /tmp/sed$$ EMPTY
	exit $es