ud2f_UDSystem Module


Uses

  • module~~ud2f_udsystem~~UsesGraph module~ud2f_udsystem ud2f_UDSystem iso_c_binding iso_c_binding module~ud2f_udsystem->iso_c_binding module~ud2f_cptrwrapper ud2f_CptrWrapper module~ud2f_udsystem->module~ud2f_cptrwrapper module~ud2f_interfaces ud2f_interfaces module~ud2f_udsystem->module~ud2f_interfaces module~ud2f_status_codes ud2f_status_codes module~ud2f_udsystem->module~ud2f_status_codes ud2f_encoding ud2f_encoding module~ud2f_udsystem->ud2f_encoding module~ud2f_cptrwrapper->iso_c_binding module~ud2f_interfaces->iso_c_binding module~ud2f_interfaces->module~ud2f_status_codes module~ud2f_interfaces->ud2f_encoding

Used by

  • module~~ud2f_udsystem~~UsedByGraph module~ud2f_udsystem ud2f_UDSystem module~test_udsystem Test_UDsystem module~test_udsystem->module~ud2f_udsystem module~udunits2f udunits2f module~test_udsystem->module~udunits2f module~test_udunits2f Test_udunits2f module~test_udunits2f->module~ud2f_udsystem module~test_udunits2f->module~udunits2f module~udunits2f->module~ud2f_udsystem module~mapl3g_convertunitsaction mapl3g_ConvertUnitsAction module~mapl3g_convertunitsaction->module~udunits2f module~mapl3g_fieldspec mapl3g_FieldSpec module~mapl3g_fieldspec->module~udunits2f module~mapl3g_fieldspec->module~mapl3g_convertunitsaction module~mapl_fieldunits mapl_FieldUnits module~mapl_fieldunits->module~udunits2f proc~initialize~3 Initialize proc~initialize~3->module~udunits2f module~mapl3g_bracketspec mapl3g_BracketSpec module~mapl3g_bracketspec->module~mapl3g_fieldspec module~mapl3g_make_itemspec mapl3g_make_itemSpec module~mapl3g_make_itemspec->module~mapl3g_fieldspec module~mapl3g_make_itemspec->module~mapl3g_bracketspec module~mapl3g_modelverticalgrid mapl3g_ModelVerticalGrid module~mapl3g_modelverticalgrid->module~mapl3g_fieldspec module~test_addfieldspec Test_AddFieldSpec module~test_addfieldspec->module~mapl3g_fieldspec module~test_bracketspec Test_BracketSpec module~test_bracketspec->module~mapl3g_fieldspec module~test_bracketspec->module~mapl3g_bracketspec module~test_fieldinfo Test_FieldInfo module~test_fieldinfo->module~mapl3g_fieldspec module~test_fieldspec Test_FieldSpec module~test_fieldspec->module~mapl3g_fieldspec module~can_connect_to_smod can_connect_to_smod module~can_connect_to_smod->module~mapl3g_modelverticalgrid module~can_connect_to_smod~2 can_connect_to_smod module~can_connect_to_smod~2->module~mapl3g_modelverticalgrid module~can_connect_to_smod~3 can_connect_to_smod module~can_connect_to_smod~3->module~mapl3g_modelverticalgrid module~initialize_advertise_smod initialize_advertise_smod module~initialize_advertise_smod->module~mapl3g_make_itemspec module~test_modelverticalgrid Test_ModelVerticalGrid module~test_modelverticalgrid->module~mapl3g_make_itemspec module~test_modelverticalgrid->module~mapl3g_modelverticalgrid

Interfaces

public interface Converter

  • private function construct_converter(from_unit, to_unit) result(conv)

    Arguments

    Type IntentOptional Attributes Name
    type(UDUnit), intent(in) :: from_unit
    type(UDUnit), intent(in) :: to_unit

    Return Value type(Converter)

public interface UDSystem

  • private function construct_system(path, encoding) result(instance)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in), optional :: path
    integer(kind=ut_encoding), intent(in), optional :: encoding

    Return Value type(UDSystem)

public interface UDUnit

  • private function construct_unit(identifier) result(instance)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: identifier

    Return Value type(UDUnit)

public interface are_convertible

  • private function are_convertible_udunit(unit1, unit2, rc) result(convertible)

    Arguments

    Type IntentOptional Attributes Name
    type(UDUnit), intent(in) :: unit1
    type(UDUnit), intent(in) :: unit2
    integer, intent(out), optional :: rc

    Return Value logical

  • private function are_convertible_str(from, to, rc) result(convertible)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: from
    character(len=*), intent(in) :: to
    integer, intent(out), optional :: rc

    Return Value logical


Derived Types

type, public, extends(CptrWrapper) ::  Converter

Constructor

private function construct_converter (from_unit, to_unit)

Type-Bound Procedures

generic, public :: convert => convert_float_0d
generic, public :: convert => convert_float_1d
generic, public :: convert => convert_float_2d
generic, public :: convert => convert_float_3d
generic, public :: convert => convert_float_4d
generic, public :: convert => convert_float_5d
generic, public :: convert => convert_double_0d
generic, public :: convert => convert_double_1d
generic, public :: convert => convert_double_2d
generic, public :: convert => convert_double_3d
generic, public :: convert => convert_double_4d
generic, public :: convert => convert_double_5d
procedure, public :: free
procedure, public :: free_memory => free_cv_converter
procedure, public :: get_cptr
procedure, public :: is_free
procedure, public :: set_cptr

type, public, extends(CptrWrapper) ::  UDSystem

Constructor

private function construct_system (path, encoding)

Type-Bound Procedures

procedure, public :: free
procedure, public, pass(this) :: free_memory => free_ut_system
procedure, public :: get_cptr
procedure, public :: is_free
procedure, public :: set_cptr

type, public, extends(CptrWrapper) ::  UDUnit

Constructor

private function construct_unit (identifier)

Type-Bound Procedures

procedure, public :: free
procedure, public, pass(this) :: free_memory => free_ut_unit
procedure, public :: get_cptr
procedure, public :: is_free
procedure, public :: set_cptr

Functions

public function cstring(s) result(cs)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: s

Return Value character(kind=c_char, len=:), allocatable


Subroutines

public subroutine finalize()

Arguments

None

public subroutine get_converter(conv, from, to, rc)

Arguments

Type IntentOptional Attributes Name
type(Converter), intent(inout) :: conv
character(len=*), intent(in) :: from
character(len=*), intent(in) :: to
integer(kind=ut_status), intent(out), optional :: rc

public subroutine initialize(path, encoding, rc)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in), optional :: path
integer(kind=ut_encoding), intent(in), optional :: encoding
integer, intent(out), optional :: rc

public subroutine read_xml(path, utsystem, status)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in), optional :: path
type(c_ptr), intent(out) :: utsystem
integer(kind=ut_status), intent(out) :: status