2640 FOR M=0 TO NVC(1)