tmac/name.sed

s/\([A-Z]\)\./\1/g
s/\([A-Z]\)[a-z]*/\1/g
s/ //g
s/^/.ds T1 /