; file: filtercube.pro = main to filter one DOT cube ; init: Jan 31 2013 Rob Rutten LA Deil ; last: Jan 31 2013 Rob Rutten LA Deil ; note: distilled from filterallcubes.pro ; specify path and cube inpath='/home/rutten/data/DOT/2005-07-13-spot/Cubes/' infile='AR0789-ha-0500-20050713-cube-1074x814x332-dt30' ; read, filter, and write cube incube=readdotcube(inpath+infile) ; conefilt, cube, px in km, cadence in sec, filter slope in km/s conefilt,incube,51,30,7 ; @ adapt? get_lun, unit openw, unit,inpath+infile+'-lo7' writeu,unit,incube close,unit end