sifvjcomp
if (sifvjcomp(f->unit, ho->neg_vj, ho->cflag, ho->maxslotindex) != 1) {
if (sifvjcomp(f->unit, 0, 0, 0) != 1) {
extern int sifvjcomp __P((int, int, int, int));