Searched refs:sub_map (Results 1 – 2 of 2) sorted by relevance
72 allocate(sub_map%pp(numtask))99 allocate(sub_map%pp(i)%p(numseg))102 sub_map%pp(i)%p = 0108 sub_map%pp(i)%p(j) = k122 ki = sub_map%pp(i)%p(j)190 ki = sub_map%pp(i)%p(j)280 ki = sub_map%pp(i)%p(j)307 kj = sub_map%pp(i)%p(krowp)326 ki = sub_map%pp(i)%p(j)454 deallocate(sub_map%pp(i)%p)[all …]
42 type(i2dd) :: sub_map,sub_revmap,sub_rowpmap variable