anchor.diff:  
   
     !---------------------------------------------------------------------------------
  -  ! mvm comments: All additions marked with !mvm: comment lines.
   
     USE decomp_2d
     USE decomp_2d_fft
     USE decomp_2d_io
     USE MPI
  -  !mvm:
  +  !coprocessing:
     use NSadaptor_module 
     IMPLICIT NONE   
     ! declare variables
  
positive.code:         PRINT *,'time',n*dt
       END IF
  
       !mvm: populating the arrays sent to the coprocessor
       DO k=decomp%xst(3),decomp%xen(3); DO j=decomp%xst(2),decomp%xen(2); DO i=decomp%xst(1),decomp%xen(1)
          realtempx(i,j,k)=REAL(wy(i,j,k)-vz(i,j,k),KIND=8)
       END DO; END DO ; END DO
  
negative.code:        rhswhatfix, nonlinuhat,&
         nonlinvhat, nonlinwhat,&
         phat,temp_c
    !coprocessing: added x,y,z component arrays 
    REAL(kind=8), DIMENSION(:,:,:), ALLOCATABLE     ::  realtemp, realtempx, &
         realtempy, realtempz
    ! MPI and 2DECOMP variables
  