Delete comparison with FORTRAN