my $tp = grep { $myhash{ $_ } } @pred;