my @file = (0.14,0.14);
my $diff = -1;