#!/bin/sh  
# \
exec tclsh "$0" "$@"

eval file delete -force -- [glob -nocomplain *.log *.cor *.orb *.done *.mag *.cen *.sig *.fin test.bun *.los *.acc *.twi *.s *.out *.w*  *.png*]


