function ANVarToString ! Uses use dc_types, only: STRING use dc_string, only: cprintf use an_vartable, only: an_variable_entry, vtable_lookup use an_types, only: AN_VARIABLE ! Variables character (len=string) :: result type (AN_VARIABLE), intent(in) :: var type (an_variable_entry) :: ent end function ANVarToString
character (len=string) :: result
type (AN_VARIABLE), intent(in) :: var
type (an_variable_entry) :: ent