ysize = exch2_global_Ny
ySize = exch2_global_Ny
xySize = exch2_global_Nx*exch2_global_Ny
INTEGER exch2_global_Ny
& exch2_global_Nx, exch2_global_Ny,
& ' X-size=', exch2_global_Nx, ' , Y-size=', exch2_global_Ny
exch2_global_Ny = exch2_xStack_Ny
exch2_global_Ny = 1
exch2_global_Ny = nbPts/W2_mapIO