Lisp para remover tudo dentro de uma camada congelada até a própria camada dwg