shr_pio_mod Module

Given a component name, return the index of that component. This is the index into io_compid, io_compname, comp_pio_iotype, etc. If the given component is not found, return -1


Uses


Interfaces

public interface shr_pio_getiotype

  • private function shr_pio_getiotype_fromid(compid) result(io_type)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: compid

    Return Value integer

  • private function shr_pio_getiotype_fromname(component) result(io_type)

    Arguments

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

    Return Value integer

public interface shr_pio_getioformat

  • private function shr_pio_getioformat_fromid(compid) result(io_format)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: compid

    Return Value integer

  • private function shr_pio_getioformat_fromname(component) result(io_format)

    Arguments

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

    Return Value integer

public interface shr_pio_getiosys

  • private function shr_pio_getiosys_fromid(compid) result(iosystem)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: compid

    Return Value type(IOSystem_desc_t), pointer

  • private function shr_pio_getiosys_fromname(component) result(iosystem)

    Arguments

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

    Return Value type(IOSystem_desc_t), pointer

public interface shr_pio_getioroot

  • private function shr_pio_getioroot_fromid(compid) result(io_root)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: compid

    Return Value integer

  • private function shr_pio_getioroot_fromname(component) result(io_root)

    Arguments

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

    Return Value integer

public interface shr_pio_getrearranger

  • private function shr_pio_getrearranger_fromid(compid) result(io_type)

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(in) :: compid

    Return Value integer

  • private function shr_pio_getrearranger_fromname(component) result(io_type)

    Arguments

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

    Return Value integer


Subroutines

public subroutine shr_pio_init1(ncomps, nlfilename, Global_Comm)

@public @brief should be the first routine called after mpi_init. It reads the pio default settings from file drv_in, namelist pio_default_inparm and, if pio_async_interface is true, splits the IO tasks away from the Compute tasks. It then returns the new compute comm in Global_Comm and sets module variable io_comm.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: ncomps
character(len=*) :: nlfilename
integer, intent(inout) :: Global_Comm

public subroutine shr_pio_init2(comp_id, comp_name, comp_iamin, comp_comm, comp_comm_iam)

@public @brief if pio_async_interface is true, tasks in io_comm do not return from this subroutine.

Read more…

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: comp_id(:)
character(len=*), intent(in) :: comp_name(:)
logical, intent(in) :: comp_iamin(:)
integer, intent(in) :: comp_comm(:)
integer, intent(in) :: comp_comm_iam(:)

public subroutine shr_pio_finalize()

Arguments

None