just maquillage

    double resolution_asec = (3600.0*180.0)/MAX(abs(metaData.uvmin),abs(metaData.uvmax))/PI;

    printf("RESOLUTION = %f rad, %f arcsec\n", resolution, resolution_asec);

    // Declare temporary arrays for the masking

    double * uus;

    double * vvs;

    double * wws;

    float * visreals;

    float * visimgs;

    float * weightss;

    long isector;

    for (long isector_count=0; isector_count<nsectors; isector_count++)

    for (long isector = 0; isector < nsectors; isector++)

    {

        clock_gettime(CLOCK_MONOTONIC, &begink);

        startk = clock();

        // define local destination sector

        //isector = (isector_count+rank)%size;

        isector = isector_count;

        //isector = (isector_count+rank)%size;  // this line must be wrong! [LT]

        // allocate sector arrays 

        long    Nsec       = histo_send[isector];

        uus = (double*) malloc(Nsec*sizeof(double));

        vvs = (double*) malloc(Nsec*sizeof(double));

        wws = (double*) malloc(Nsec*sizeof(double));

        double *uus        = (double*) malloc(Nsec*sizeof(double));

        double *vvs        = (double*) malloc(Nsec*sizeof(double));

        double *wws        = (double*) malloc(Nsec*sizeof(double));

        long    Nweightss  = Nsec*metaData.polarisations;

        long    Nvissec    = Nweightss*metaData.freq_per_chan;

        weightss = (float*) malloc(Nweightss*sizeof(float));

        visreals = (float*) malloc(Nvissec*sizeof(float));

        visimgs = (float*) malloc(Nvissec*sizeof(float));

        float *weightss    = (float*) malloc(Nweightss*sizeof(float));

        float *visreals    = (float*) malloc(Nvissec*sizeof(float));

        float *visimgs     = (float*) malloc(Nvissec*sizeof(float));

        // select data for this sector

        long icount = 0;

       #ifndef USE_MPI

       long stride = isector*2*xaxis*yaxis*num_w_planes;

          for (long iii=0; iii<2*xaxis*yaxis*num_w_planes; iii++)gridtot[stride+iii] = gridss[iii];

       for (long iii=0; iii<2*xaxis*yaxis*num_w_planes; iii++)

	 gridtot[stride+iii] = gridss[iii];

       #endif

       // Write grid in the corresponding remote slab

      #ifdef USE_MPI

          int target_rank = (int)isector;

          //int target_rank = (int)(size-isector-1);

       // int target_rank = (int)isector;    it implied that size >= nsectors

       int target_rank = (int)(isector % size);

      #ifdef ONE_SIDE

       printf("One Side communication active\n");

       MPI_Win_lock(MPI_LOCK_SHARED,target_rank,0,slabwin);