Searched refs:numvar (Results 1 – 1 of 1) sorted by relevance
65 integer :: maxicountN, maxicountNglob, numvar, sumvar local817 numvar = 1+ndof+ndofybar+ndoferrors907 allocate(qrecv(ifill*numvar))909 call mpi_recv(qrecv, ifill*numvar, MPI_DOUBLE, irM,912 intvID = qrecv( (i-1)*numvar+1 )+1.1 ! shift to start from 1916 qoldN(intvID,idof) = qrecv( (i-1)*numvar+sumvar )922 ybarN(intvID,idof) = qrecv( (i-1)*numvar+sumvar)930 & qrecv( (i-1)*numvar+sumvar)940 & qrecv( (i-1)*numvar+sumvar)950 & qrecv( (i-1)*numvar+sumvar)[all …]