Lines Matching refs:ierr
20 CALL MPI_TYPE_EXTENT (MPI_DOUBLE_PRECISION,sizeofdouble,ierr)
105 & MPI_DOUBLE_PRECISION, sevsegtype(itask,1), ierr)
113 & sevsegtype(itask,2), ierr)
116 & sevsegtype(itask,3), ierr)
119 & sevsegtype(itask,1),sevsegtype(itask,4), ierr)
121 & sevsegtype(itask,1),sevsegtype(itask,5), ierr)
123 & sevsegtype(itask,6), ierr)
125 & sevsegtype(itask,7), ierr)
127 & sevsegtype(itask,8), ierr)
129 & sevsegtype(itask,9), ierr)
131 & sevsegtype(itask,10), ierr)
133 & sevsegtype(itask,11), ierr)
135 & sevsegtype(itask,12), ierr)
137 & sevsegtype(itask,13), ierr)
139 & sevsegtype(itask,14), ierr)
141 & sevsegtype(itask,15), ierr)
148 call MPI_TYPE_COMMIT (sevsegtype(itask,kdof), ierr)