Lines Matching refs:numtask

148       integer                  :: i,numtask,itkbeg,numseg,iacc  local
158           numtask = ilwork(1)+1
160           numtask = 1
165       allocate(subnei(numtask))
171       do i=2,numtask
178           numtask = rmapmax-1
179           allocate(subcfrev(numtask))
180           allocate(subnei(numtask))
181           do i=1,numtask
186       allocate(subcfstop(numtask))
187       allocate(subcf(numtask))
188       allocate(subnnz(numtask))
212       do i=1,numtask
234       do i=1,numtask