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

eval file delete -force -- [glob -nocomplain *.log *.new *.mag *.fin *.twi *.param *.bun *.out *.sig *.cen]

