diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2017-11-28 21:22:45 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2017-11-28 21:22:45 (GMT) |
commit | 920ad35c65d71e5161e54c3f9a779d812ae69764 (patch) | |
tree | 085dc67a9def449011b12df84fceef65dbb6b36c /tksao/frame | |
parent | 3bdb2ae4b744da23af47159ae701dc79a6aca159 (diff) | |
download | blt-920ad35c65d71e5161e54c3f9a779d812ae69764.zip blt-920ad35c65d71e5161e54c3f9a779d812ae69764.tar.gz blt-920ad35c65d71e5161e54c3f9a779d812ae69764.tar.bz2 |
update AST WCS
Diffstat (limited to 'tksao/frame')
-rw-r--r-- | tksao/frame/fitsimage.C | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/tksao/frame/fitsimage.C b/tksao/frame/fitsimage.C index 8bbb4ce..7eaeb08 100644 --- a/tksao/frame/fitsimage.C +++ b/tksao/frame/fitsimage.C @@ -1656,13 +1656,8 @@ void FitsImage::match(const char* xxname1, const char* yyname1, Tcl_Obj* objrr = Tcl_NewListObj(0,NULL); for(int jj=0; jj<nxx2; jj++) { for (int ii=0; ii<nxx1; ii++) { - double pt1[2]; - pt1[0] = ptr1[ii][0]; - pt1[1] = ptr1[ii][1]; - double pt2[2]; - pt2[0] = ptr2[jj][0]; - pt2[1] = ptr2[jj][1]; - double dd = wcsDistance(newast_,pt1,pt2); + double dd = wcsDistance(newast_,ptr1[ii],ptr2[jj]); + if ((dd != AST__BAD) && (dd <= rr)) { Tcl_Obj* obj[2]; obj[0] = Tcl_NewIntObj(ii+1); |