diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-06-12 21:07:26 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-06-12 21:07:26 (GMT) |
commit | c603e045890f38b2c64bac190e934800355bc771 (patch) | |
tree | 2e32265ebdfb8012a46694f38b450fadf0cd88cf /ds9/library/catsimbad.tcl | |
parent | 2a884140458c2f4ed271dd5b6fb74502db4653be (diff) | |
download | blt-c603e045890f38b2c64bac190e934800355bc771.zip blt-c603e045890f38b2c64bac190e934800355bc771.tar.gz blt-c603e045890f38b2c64bac190e934800355bc771.tar.bz2 |
catalog: use cone search radius instead of width/height
Diffstat (limited to 'ds9/library/catsimbad.tcl')
-rw-r--r-- | ds9/library/catsimbad.tcl | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/ds9/library/catsimbad.tcl b/ds9/library/catsimbad.tcl index 85dda66..7efeda3 100644 --- a/ds9/library/catsimbad.tcl +++ b/ds9/library/catsimbad.tcl @@ -74,9 +74,7 @@ proc CATSIMBAD {varname} { append qq "$yy" } - set ww $var(width) - set hh $var(height) - set rr [expr ($ww+$hh)/2.] + set rr $var(radius) append qq " radius=$rr" switch -- $var(rformat) { |