main=interact$filter(\c->c<'C'||c>'T')