delete_error_file :-
error_file(ErrorFile),
exists_file(ErrorFile),
delete_file(ErrorFile),
!.
delete_error_file.