Commit 60f2989c authored by Nandhana Sakhtivel's avatar Nandhana Sakhtivel
Browse files

Changes in variables

parent dac28420

allvars.c

+0 −1
Original line number Diff line number Diff line
@@ -26,7 +26,6 @@ struct timespec begin, finish, begin0, begink, finishk; 
struct sectorlist ** sectorhead;

long * histo_send, size_of_grid;

double * grid, *gridss, *gridss_real, *gridss_img, *gridss_w;

fftw_complex *fftwgrid;



#ifdef USE_MPI

    MPI_Win slabwin;

allvars.h

+0 −1
Original line number Diff line number Diff line
@@ -131,7 +131,6 @@ extern clock_t start, end, start0, startk, endk; 
extern struct timespec begin, finish, begin0, begink, finishk;

extern long * histo_send, size_of_grid;

extern double * grid, *gridss, *gridss_real, *gridss_img, *gridss_w;

extern fftw_complex *fftwgrid;



#ifdef USE_MPI

    extern  MPI_Win slabwin;

fourier_transform.c

+2 −1
Original line number Diff line number Diff line
@@ -10,6 +10,7 @@ void fftw_data(){ 
        clock_gettime(CLOCK_MONOTONIC, &begin);

        start = clock();

        fftw_plan plan;

        fftw_complex *fftwgrid;

        ptrdiff_t alloc_local, local_n0, local_0_start;

        double norm = 1.0/(double)(param.grid_size_x*param.grid_size_y);
@@ -56,6 +57,7 @@ void fftw_data(){ 
        }



        fftw_destroy_plan(plan);

        fftw_free(fftwgrid);



        #ifdef USE_MPI

        MPI_Win_fence(0,slabwin);
@@ -150,7 +152,6 @@ void write_fftw_data(){ 
        #endif

     #endif //WRITE_DATA



     fftw_free(fftwgrid);



     // Phase correction