open INP, "$fin" or die "Cannot open $fin for read :$!";