6680 XB=VC(N,2) : IF N=0 THEN XB=-1E+10