MPI_Sendrecv(&spinor_field[l][0].c1.c1.re,          1, g_field_time_slice_cont, g_nb_t_dn, 81, &spinor_field[l][T*LX*L*L/2].c1.c1.re, 1, g_field_time_slice_cont, g_nb_t_up, 81,
MPI_Sendrecv(&spinor_field[l][0].c1.c1.re,          1, field_time_slice_cont, g_nb_t_dn, 81, &spinor_field[l][T*LX*L*L/2].c1.c1.re, 1, field_time_slice_cont, g_nb_t_up, 81,
void xchange_field(int l){#ifdef MPI  MPI_Status status;  /* send the data to the neighbour on the left */  /* recieve the data from the neighbour on the right */  MPI_Sendrecv(&spinor_field[l][0].c1.c1.re,          1, g_field_time_slice_cont, g_nb_t_dn, 81,	       &spinor_field[l][T*LX*L*L/2].c1.c1.re, 1, g_field_time_slice_cont, g_nb_t_up, 81,	       g_cart_grid, &status);  /* send the data to the neighbour on the right */  /* recieve the data from the neighbour on the left */  MPI_Sendrecv(&spinor_field[l][(T-1)*LX*L*L/2].c1.c1.re, 1, g_field_time_slice_cont, g_nb_t_up, 82,	       &spinor_field[l][(T+1)*LX*L*L/2].c1.c1.re, 1, g_field_time_slice_cont, g_nb_t_dn, 82,	       g_cart_grid, &status);#ifdef PARALLELXT  /* send the data to the neighbour on the left in x direction */  /* recieve the data from the neighbour on the right in x direction */  MPI_Sendrecv(&spinor_field[l][0],                1, g_field_x_slice_gath, g_nb_x_dn, 91,  	       &spinor_field[l][(T+2)*LX*LY*LZ/2], 1, g_field_x_slice_cont, g_nb_x_up, 91, 	       g_cart_grid, &status);  /* send the data to the neighbour on the right in x direction */  /* recieve the data from the neighbour on the left in x direction */    MPI_Sendrecv(&spinor_field[l][(LX-1)*LY*LZ/2],               1, g_field_x_slice_gath, g_nb_x_up, 92,	       &spinor_field[l][((T+2)*LX*LY*LZ + T*LY*LZ)/2], 1, g_field_x_slice_cont, g_nb_x_dn, 92,	       g_cart_grid, &status);#endif#endif}