cleanup is_procedure