my_add_attribute Subroutine

  1. m_psml_dump.F90
  2. m_psml_dump
  3. my_add_attribute

private subroutine my_add_attribute(xf, name, value)

Uses

    • xmlf90_wxml

Arguments

Type IntentOptional AttributesName
type(xmlf_t), intent(inout) :: xf
character(len=*), intent(in) :: name
character(len=*), intent(in) :: value

Contents

Source Code

my_add_attribute

Source Code

subroutine my_add_attribute(xf,name,value)

  use xmlf90_wxml

  type(xmlf_t), intent(inout)   :: xf
  character(len=*), intent(in)  :: name
  character(len=*), intent(in)  :: value

  call xml_AddAttribute(xf,name,trim(value))
end subroutine my_add_attribute