Searched refs:sidmapl (Results 1 – 1 of 1) sorted by relevance
549 integer, allocatable :: sidmapl(:) ! list of surfID's on-proc local594 allocate( sidmapl(nsidl) )597 sidmapl(j)=sidelt%value601 allocate( sidmapl(1)) ! some compilers/MPI don't like to send unallocated arrays664 call MPI_ALLGATHERV(sidmapl(:),nsidl,700 sidmapg=sidmapl701 deallocate(sidmapl)