function gauss_cleaner, img

opq = !quiet
!quiet = 1
imgr = gauss_remove(img, wsize = [45, 45], thresh = 1.5, order = 2, show = 0)
imgs = gauss_remove(imgr, wsize = [25, 25], thresh = 1.2, order = 2, show = 0)
imgt = gauss_remove(imgs, wsize = [11, 11], thresh = .5, order = 2, show = 0)
imgu = gauss_remove(imgt, wsize = [5, 5], thresh = .5, order = 2, show = 0)
!quiet = opq

return, imgu

end