Searched refs:subcf (Results 1 – 2 of 2) sorted by relevance
151 & :: subcfstop,subnnz,subcf,subcfrev,subnei local187 allocate(subcf(numtask))190 subcf = 0209 subcf(p) = subcf(p) + 1220 if ((subcf(i).lt.30).and.subneireduce) then224 if (subcf(i).lt.200) then227 if ((subnnz(i)/(subcf(i)**2)).gt.0.6) then265 deallocate(subcf)
42 integer,allocatable,dimension(:) :: subcf,subcfrev,subnei local77 allocate(subcf(numtask))78 subcf = 094 allocate(subcf(numtask))97 subcf = 0125 subcf = 0132 subcf(p) = subcf(p) + 1141 deallocate(subcf)