在fortran中查找重复记录

在fortran中查找重复记录