diff --git a/src/bc.f90 b/src/bc.f90
index 191a4ffd5a8c3cba623abc93005fef015426445d..4c12a88725b33f440b5be891b6441b846a694473 100755
--- a/src/bc.f90
+++ b/src/bc.f90
@@ -179,6 +179,7 @@
       real(kind=pr) :: wval
       integer :: m
 
+      call sync(myvar)  ! between procs through the sync routines
       if (bcx.eq.'w') then
         if (myid.eq.0) then
           do 1 m=1,gc
@@ -191,7 +192,7 @@
 2         enddo
         endif
       elseif (bcx.eq.'p') then
-        call sync(myvar)  ! done through the sync routines
+        ! between procs through the sync routines
       elseif (bcx.eq.'i') then
         if (myid.eq.0) then
           do 7 m=1,gc
@@ -244,9 +245,7 @@
       real(kind=pr) :: myvar(ii,jj,ll)
       integer :: m
 
-      if (bcx.eq.'p') then
-        call syncLEsource(myvar)  ! done through the sync routines
-      endif
+      call syncLEsource(myvar)  ! between procs through the sync routines
 
       if (bcy.eq.'p') then
         do 4 m=1,gc
diff --git a/src/write_vtk.f90 b/src/write_vtk.f90
index 57c3f64d349453c4c2c4d53a501f0d30e7af487c..bb3af387d62bd1568c456747f573d21c19f08325 100755
--- a/src/write_vtk.f90
+++ b/src/write_vtk.f90
@@ -156,6 +156,7 @@
         character(*)  :: name
 
         write(10,'(3a)') 'SCALARS ',name,' float 1'
+        write(10,'(a)') 'LOOKUP_TABLE default '
         do l=lmin-1,lmax+1; do j=jmin-1,jmax+1
           write(10,fmt=rowfmt) (myvar(i,j,l),i=imin,imax+1)
         enddo; enddo