anchor.diff:          module procedure adios2_define_variable_attribute_integer8_1d
   
           ! Single value
  -        module procedure adios2_define_variable_attribute_separator_string
  -        module procedure adios2_define_variable_attribute_separator_real
  -        module procedure adios2_define_variable_attribute_separator_dp
  -        module procedure adios2_define_variable_attribute_separator_integer1
  -        module procedure adios2_define_variable_attribute_separator_integer2
  -        module procedure adios2_define_variable_attribute_separator_integer4
  -        module procedure adios2_define_variable_attribute_separator_integer8
  +        module procedure adios2_def_var_att_sep_string
  +        module procedure adios2_def_var_att_sep_real
  +        module procedure adios2_def_var_att_sep_dp
  +        module procedure adios2_def_var_att_sep_integer1
  +        module procedure adios2_def_var_att_sep_integer2
  +        module procedure adios2_def_var_att_sep_integer4
  +        module procedure adios2_def_var_att_sep_integer8
   
           ! 1D Array
  -        module procedure adios2_define_variable_attribute_separator_string_1d
  -        module procedure adios2_define_variable_attribute_separator_real_1d
  -        module procedure adios2_define_variable_attribute_separator_dp_1d
  -        module procedure adios2_define_variable_attribute_separator_integer1_1d
  -        module procedure adios2_define_variable_attribute_separator_integer2_1d
  -        module procedure adios2_define_variable_attribute_separator_integer4_1d
  -        module procedure adios2_define_variable_attribute_separator_integer8_1d
  +        module procedure adios2_def_var_att_sep_string_1d
  +        module procedure adios2_def_var_att_sep_real_1d
  +        module procedure adios2_def_var_att_sep_dp_1d
  +        module procedure adios2_def_var_att_sep_integer1_1d
  +        module procedure adios2_def_var_att_sep_integer2_1d
  +        module procedure adios2_def_var_att_sep_integer4_1d
  +        module procedure adios2_def_var_att_sep_integer8_1d
   
       end interface
   
  
positive.code:     end subroutine
  
      ! 1D
      subroutine adios2_define_variable_attribute_separator_string_1d(attribute, io, name, &
                                                                      data, length, &
                                                                      variable_name, &
                                                                      ierr)
          type(adios2_attribute), intent(out) :: attribute
          type(adios2_io), intent(in) :: io
          character*(*), intent(in) :: name
  
negative.code:         end if
      end subroutine
  
      subroutine adios2_def_var_att_sep_integer1_1d(attribute, io, &
                                                    name, data, &
                                                    length, &
                                                    variable_name, &
                                                    ierr)
          type(adios2_attribute), intent(out) :: attribute
          type(adios2_io), intent(in) :: io
          character*(*), intent(in) :: name
  