diff --git a/src/bc.f90 b/src/bc.f90 index 7ec1004c4ffc559554f7678a306c297cda894ec0..ccd73d7e7ef89940b542c3eb43141de0c8506afa 100755 --- a/src/bc.f90 +++ b/src/bc.f90 @@ -27,11 +27,9 @@ 2 enddo endif elseif (bcx.eq.'p') then - call sync(myu); call sync(myv); call sync(myw) + ! between procs through the sync routines elseif (bcx.eq.'i') then - if (myid.eq.0) then ! see inflow routine - endif if (myid.eq.nrprocs-1) then do 8 m=1,gc myu(imax+m-1,:,:)=myu(imax-1,:,:)