Searched refs:vave (Results 1 – 1 of 1) sorted by relevance
1011 real(kind=8) :: v,vave,vmax local1016 call MPI_AllReduce(v,vave,1,1018 vave = vave/numpe1020 vave = v1025 write(*,7101)trim(str),vave,vmax