anchor.diff:      end do
     end function
     
  -  !> interpolate scaler v from scatter s1 to scatter s2
  +  !> interpolate scalar v from scatter s1 to scatter s2
     function itplScat2ScatScal(v,s1,sht,s2)
       use moduleSpatialHashing
       use moduleBasicDataStruct
  
positive.code:     end forall
    end function
    
    !> interpolate scaler v within grid from node to edge
    function itplNode2EdgeScal(v,grid)
      use moduleGrid
      use moduleBasicDataStruct
  
negative.code:     end forall
    end function
    
    !> interpolate scalar v within grid from node to cell (1-D)
    function itplNode2CellScal(v,grid)
      use moduleGrid1D
      use moduleBasicDataStruct
  