Lines Matching refs:PATH_LENGTH
488 INTEGER NUM1,NUM2,NUMTOT,PATH_LENGTH,NLAST
540 PATH_LENGTH = 2
561 WEIGHT(PATH_LENGTH+1) =
565 PATH_LENGTH = PATH_LENGTH+1
581 WEIGHT(PATH_LENGTH+1) =
582 & DMUMPS_739(WEIGHT(PATH_LENGTH-1),CUR_VAL,TUP)
585 IF(mod(PATH_LENGTH,2) .EQ. 1) THEN
586 IF(WEIGHT(PATH_LENGTH+1) .GE. WEIGHT(PATH_LENGTH)) THEN
591 DO I=1,(PATH_LENGTH-1)/2
599 NUMTOT = NUMTOT + PATH_LENGTH - 1
607 DO I=1,(PATH_LENGTH/2)
616 BEST_SCORE = WEIGHT(PATH_LENGTH-1)
618 DO I=1,(PATH_LENGTH/2)-1
619 TMP = DMUMPS_739(WEIGHT(PATH_LENGTH),
627 TMP = DMUMPS_739(WEIGHT(PATH_LENGTH+1),
637 DO I=1,(PATH_LENGTH/2)-1
645 NUMTOT = NUMTOT + PATH_LENGTH - 2