test_SetAttribute_string Subroutine

public subroutine test_SetAttribute_string()

Arguments

None

Calls

proc~~test_setattribute_string~~CallsGraph proc~test_setattribute_string Test_MAPL_Config::test_SetAttribute_string ESMF_ConfigGetAttribute ESMF::ESMF_ConfigGetAttribute proc~test_setattribute_string->ESMF_ConfigGetAttribute interface~mapl_configsetattribute MAPL_ConfigMod::MAPL_ConfigSetAttribute proc~test_setattribute_string->interface~mapl_configsetattribute proc~mapl_configcreate MAPL_ConfigMod::MAPL_ConfigCreate proc~test_setattribute_string->proc~mapl_configcreate ESMF_ConfigCreate ESMF::ESMF_ConfigCreate proc~mapl_configcreate->ESMF_ConfigCreate buffer buffer proc~mapl_configcreate->buffer

Source Code

   subroutine test_SetAttribute_string
      type (ESMF_Config) :: config
      integer :: status
      character(len=ESMF_MAXSTR) :: str

      
      config = MAPL_ConfigCreate()
      call MAPL_ConfigSetAttribute(config, 'LatLon', 'GRID_TYPE:', rc=status)
      call ESMF_ConfigGetAttribute(config, value=str, label='GRID_TYPE:', rc=status)
   end subroutine test_SetAttribute_string