anchor.diff:      character(len=*), intent(in) :: filename, prog_name
   
       character(len=5) :: h5md_version
  -    integer(HID_T) :: h5_g_id
  +    integer(HID_T) :: h5_g_id, g_id
       integer(HID_T) :: a_type, a_space, a_id
       integer(HSIZE_T) :: a_size(1)
   
  
positive.code: 
      call h5aclose_f(a_id, h5_error)
      call h5sclose_f(a_space, h5_error)
      
      h5md_version = '0.1.0'
      a_size(1) = len(h5md_version)
  
negative.code:   ! data is the actual data of dim (D,N)
    ! step is the integer step of simulation. if the linked 'step' dataset's latest value
    ! is present_step, 'step' and 'time' are not updated. Else, they are.
    subroutine h5md_write_trajectory_data_d(traj_id, data, present_step, time)
      integer(HID_T), intent(in) :: traj_id
      double precision, intent(in) :: data(:,:)
      integer, intent(in) :: present_step
      double precision, intent(in) :: time
  
      
      
    end subroutine h5md_write_trajectory_data_d
  
    ! takes a single value and appends it to the appropriate buffer.
    ! if the buffer size is reached, the buffer is dumped to the file.
  