Searched refs:qsurfProc (Results 1 – 1 of 1) sorted by relevance
602 real*8 qsurf(0:MAXSURF),qsurfProc(0:MAXSURF) local607 qsurfProc=zero617 qsurfProc(irankCoupled) = qsurfProc(irankCoupled)641 call MPI_ALLREDUCE (qsurfProc, qsurf(:), npars,