Delete funcoes.~pas