Fixed argument error in findmex.f90