del l_fits ver- >& "dev$null"
del l_imh ver- >& "dev$null"
files *.fits >> l_fits
files *.%fits%imh >> l_imh
rfits @l_fits * @l_imh
imdel @l_fits ver-
del l_fits ver-; del l_imh ver-