| 110 |  |  | 
| 111 |  | MPI_Status ierr; | 
| 112 |  | int zmolIndex; | 
| 113 | < | double data[3]; | 
| 113 | > | RealType data[3]; | 
| 114 |  |  | 
| 115 |  | if (masterNode == 0) { | 
| 116 |  |  | 
| 130 |  | } else { | 
| 131 |  | for(int k =0 ; k < nFixedZmolsInProc[i]; ++k) { | 
| 132 |  | MPI_Recv(&zmolIndex, 1, MPI_INT, i, 0, MPI_COMM_WORLD,&ierr); | 
| 133 | < | MPI_Recv(data, 3, MPI_DOUBLE, i, 0, MPI_COMM_WORLD,&ierr); | 
| 133 | > | MPI_Recv(data, 3, MPI_REALTYPE, i, 0, MPI_COMM_WORLD,&ierr); | 
| 134 |  | tmpData.zmolIndex = zmolIndex; | 
| 135 |  | tmpData.zforce= data[0]; | 
| 136 |  | tmpData.zpos = data[1]; | 
| 159 |  | data[1] = j->zpos; | 
| 160 |  | data[2] = j->param.zTargetPos; | 
| 161 |  | MPI_Send(&zmolIndex, 1, MPI_INT, masterNode, 0, MPI_COMM_WORLD); | 
| 162 | < | MPI_Send(data, 3, MPI_DOUBLE, masterNode, 0, MPI_COMM_WORLD); | 
| 162 | > | MPI_Send(data, 3, MPI_REALTYPE, masterNode, 0, MPI_COMM_WORLD); | 
| 163 |  |  | 
| 164 |  | } | 
| 165 |  | } |