diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2017-08-04 17:13:27 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2017-08-04 17:13:27 (GMT) |
| commit | 5d9705d9050844caf9ac94ea1d79adad33b0fd51 (patch) | |
| tree | 59c63165157d2f728994e0fd5e5d7ba08f8a03fe /ds9/library | |
| parent | b2fc5bedb69d70d8e1382d8942b7c86f4e485c1e (diff) | |
| download | blt-5d9705d9050844caf9ac94ea1d79adad33b0fd51.zip blt-5d9705d9050844caf9ac94ea1d79adad33b0fd51.tar.gz blt-5d9705d9050844caf9ac94ea1d79adad33b0fd51.tar.bz2 | |
add elliptical gaussian smooth
Diffstat (limited to 'ds9/library')
| -rw-r--r-- | ds9/library/smooth.tcl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/ds9/library/smooth.tcl b/ds9/library/smooth.tcl index dd54c63..ddb7dd8 100644 --- a/ds9/library/smooth.tcl +++ b/ds9/library/smooth.tcl @@ -17,8 +17,8 @@ proc SmoothDef {} { set smooth(function) gaussian set smooth(radius) 3 set smooth(radius,minor) 3 - set smooth(sigma) 1 - set smooth(sigma,minor) 1 + set smooth(sigma) 1.5 + set smooth(sigma,minor) 1.5 set smooth(angle) 0 array set psmooth [array get smooth] @@ -117,7 +117,7 @@ proc SmoothDialog {} { ttk::label $f.descr -text {2*radius+1} slider $f.rslider 1 20 {Radius} smooth(radius) \ {SmoothCheckSigma radius sigma} - slider $f.sslider 1 20 {Sigma} smooth(sigma) {} + slider $f.sslider 1. 20. {Sigma} smooth(sigma) {} grid $f.tdescr $f.descr -padx 2 -pady 2 -sticky w grid $f.rslider -columnspan 20 -padx 2 -pady 2 -sticky ew @@ -134,8 +134,8 @@ proc SmoothDialog {} { {SmoothCheckSigma radius sigma} slider $f.rmslider 1 20 [msgcat::mc {Minor Radius}] smooth(radius,minor) \ {SmoothCheckSigma radius,minor sigma,minor} - slider $f.sslider 1 20 [msgcat::mc {Major Sigma}] smooth(sigma) {} - slider $f.smlider 1 20 [msgcat::mc {Minor Sigma}] smooth(sigma,minor) {} + slider $f.sslider 1. 20. [msgcat::mc {Major Sigma}] smooth(sigma) {} + slider $f.smlider 1. 20. [msgcat::mc {Minor Sigma}] smooth(sigma,minor) {} grid $f.tangle $f.angle -padx 2 -pady 2 -sticky w grid $f.tdescr $f.descr -padx 2 -pady 2 -sticky w |