ViewVC Help

View File | Revision Log | Show Annotations | Download File | Root Listing

root/Development/ray/src/util/glare.csh

Comparing ray/src/util/glare.csh (file contents):
Revision 1.4 by greg, Wed May 1 12:17:57 1991 UTC vs.
Revision 1.8 by greg, Fri May 3 10:06:06 1991 UTC

#	Line 62 | Line 62 | _EOF_
62		echo "You must specify a picture or an octree"
63		exit 1
64		endif
65	+	if ( $picture == $nofile && "$view" == "" ) then
66	+	echo "You must give a view if there is no picture"
67	+	exit 1
68	+	endif
69		if ( $picture != $nofile ) then
70		if ( ! -r $picture ) then
71		echo "Cannot read $picture"
#	Line 132 | Line 136 | if ($?DISPLAY && $picture != $nofile) then
136		echo ""
137		echo "Displaying glare sources in '$picture'..."
138		xglaresrc $picture $glarefile >& /dev/null
139	<	if ($status) then
140	<	x11image =+0+0 -g 2.6 $picture &
141	<	sleep 40
142	<	xglaresrc $picture $glarefile
139	>	if ($status == 2) then
140	>	echo "Starting ximage..."
141	>	ximage =+0+0 $picture &
142	>	WaitAndTryXglrAgain:
143	>	sleep 10
144	>	xglaresrc $picture $glarefile >& /dev/null
145	>	if ($status == 2) goto WaitAndTryXglrAgain
146		endif
147		endif
148	<	set ndxnam=("Guth Visual Comfort Probability" "Guth Disability Glare Ratio")
149	<	set ndxcom=(guth_vcp guth_dgr)
148	>	set ndxnam=("Guth Visual Comfort Probability" "Guth Disability Glare Ratio" "CIE Glare Index")
149	>	set ndxcom=("glarendx -t guth_vcp" "glarendx -t guth_dgr" "glarendx -t cie_cgi")
150	>	set bcdlvl=(50 124 18.5)
151		while ( 1 )
152		echo ""
153		echo "  0.  Quit"
#	Line 181 | Line 189 | include=line.plt
189		include=polar.plt
190		title="$ndxnam[$choice]"
191		subtitle="$subtitle"
192	+	Bdata=
193	+	0       $bcdlvl[$choice]
194	+	360     $bcdlvl[$choice]
195	+	;
196	+	Blabel="BCD level"
197		Adata=
198		_EOF_
199		getinfo - < $gndxfile >> $plotfile

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines (old)
>	Changed lines (new)