Searched refs:reducemap (Results 1 – 3 of 3) sorted by relevance
109 integer,allocatable,dimension(:,:) :: reducemap,rmap1d variable
768 allocate(reducemap(nr,nr))770 reducemap = 0774 reducemap(i,i) = i790 reducemap(i,mj) = rmapmax791 reducemap(mj,i) = -rmapmax817 flag(mj) = iabs(reducemap(flag(mj),i))
622 deallocate(reducemap)