rdkimg,'\images\dark\cam0\d1900060.002',hb,dk
dk=lin_smooth(dk,/down)

rdkimg,'\images\airglow\cam0\filt2\g1902060.059',hb,im59
cim59=(im59-dk)>0

factor=2.10
lostcols=33
nscols=CEIL(factor*256)

scim59=ROTATE(REBIN(cim59,256,256,/SAMPLE),2)
blank=INTARR(nscols,256)
blank(0:255,0:255)=scim59
xcols=nscols-256-lostcols
blank(289:nscols-1,0:255)=scim59(0:MIN([xcols-1,255]),0:255)

nrcols=FLOOR(nscols/factor)
rcol=REBIN(FINDGEN(nrcols)*factor,nrcols,256)
rrow=REBIN(FINDGEN(1,256),nrcols,256)

shrink=BILINEAR(blank,rcol,rrow)
tvsi,shrink<pcentile(shrink,0.99),ct=0