find_pfs
if (find_pfs(fp, &bscan[i], pfs, res) == -1) {
if (find_pfs(fp, bref, pfs, &res) == 0 && res) {