como eliminar registro duplicado (firebird)

delete from NOME_TABELA A

where (select count(B.NOME_CAMPO)
from NOME_TABELA B
where B.NOME_CAMPO = A.NOME_CAMPO) > 1