anchor.diff:     ErrMsg  = ""
   
      IF (.NOT. M%Initialized) RETURN
  +   
  +   if ( PRESENT(PositionOnly) ) then
  +      OnlyPosition = PositionOnly
  +   else
  +      OnlyPosition = .false.
  +   end if
  +   
      
      !.................................................................
      ! we'll write the mesh reference fields on the first timestep only:
  
positive.code: !**********************************************************************************************************************************
  ! LICENSING
  ! Copyright (C) 2013-2015  National Renewable Energy Laboratory
  !
  !    This file is part of the NWTC Subroutine Library.
  !
  
negative.code: 
  
        WRITE(Un,'(A)')         '      </PointData>'
  end if !(.not. OnlyPosition)      
  
        
  ! lines (i.e., elements; for line2 meshes only):
  