Lines Matching refs:numtask

41       integer            :: numtask,itkbeg,numseg,iacc  local
68           numtask = ilwork(1)+1
70           numtask = 1
77       allocate(subcf(numtask))
79       allocate(subnei(numtask))
85       do i=2,numtask
92           numtask = rmapmax-1
93           allocate(subcfrev(numtask))
94           allocate(subcf(numtask))
95           allocate(subnei(numtask))
99           do i=1,numtask
135       do i = 1,numtask