--- ray/src/px/falsecolor.csh 2004/03/08 21:39:32 2.9 +++ ray/src/px/falsecolor.csh 2004/07/31 17:56:56 2.10 @@ -1,5 +1,5 @@ #!/bin/csh -fe -# RCSid: $Id: falsecolor.csh,v 2.9 2004/03/08 21:39:32 greg Exp $ +# RCSid: $Id: falsecolor.csh,v 2.10 2004/07/31 17:56:56 greg Exp $ # # Create false color image with legend # @@ -162,7 +162,7 @@ if ( $legwidth > 20 && $legheight > 40 ) then pcomb $pc0args -e 'v=(y+.5)/yres;vleft=v;vright=v' \ -e 'vbelow=(y-.5)/yres;vabove=(y+1.5)/yres' \ -x $legwidth -y $legheight > $td/scol.pic -( echo $label; cnt $ndivs \ +( echo "$label"; cnt $ndivs \ | rcalc -e '$1='"($scale)*imap(($ndivs-.5-"'$1'")/$ndivs)" \ -e "$imap" | sed -e 's/\(\.[0-9][0-9][0-9]\)[0-9]*/\1/' ) \ | psign -s -.15 -cf 1 1 1 -cb 0 0 0 \