SYNTAX
------

C Syntax
^^^^^^^^

.. code-block:: c

    int MPI_Type_create_hindexed(int count, const int
        array_of_blocklengths[], const MPI_Aint
        array_of_displacements[], MPI_Datatype oldtype, MPI_Datatype*
        newtype)

    int MPI_Type_create_hindexed_c(MPI_Count count, const MPI_Count
        array_of_blocklengths[], const MPI_Count
        array_of_displacements[], MPI_Datatype oldtype, MPI_Datatype*
        newtype)

Fortran Syntax
^^^^^^^^^^^^^^

.. code-block:: fortran

    USE MPI
    ! or the older form: INCLUDE 'mpif.h'
    MPI_TYPE_CREATE_HINDEXED(COUNT, ARRAY_OF_BLOCKLENGTHS, ARRAY_OF_DISPLACEMENTS, OLDTYPE, NEWTYPE, IERROR)
    	INTEGER COUNT, ARRAY_OF_BLOCKLENGTHS(*), OLDTYPE, NEWTYPE, IERROR
    	INTEGER(KIND=MPI_ADDRESS_KIND) ARRAY_OF_DISPLACEMENTS(*)

Fortran 2008 Syntax
^^^^^^^^^^^^^^^^^^^

.. code-block:: fortran

    USE mpi_f08
    MPI_Type_create_hindexed(count, array_of_blocklengths, array_of_displacements, oldtype, newtype, ierror)
    	INTEGER, INTENT(IN) :: count, array_of_blocklengths(count)
    	INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: array_of_displacements(count)
    	TYPE(MPI_Datatype), INTENT(IN) :: oldtype
    	TYPE(MPI_Datatype), INTENT(OUT) :: newtype
    	INTEGER, OPTIONAL, INTENT(OUT) :: ierror

    MPI_Type_create_hindexed(count, array_of_blocklengths, array_of_displacements, oldtype, newtype, ierror)
    	INTEGER(KIND=MPI_COUNT_KIND), INTENT(IN) :: count, array_of_blocklengths(count), array_of_displacements(count)
    	TYPE(MPI_Datatype), INTENT(IN) :: oldtype
    	TYPE(MPI_Datatype), INTENT(OUT) :: newtype
    	INTEGER, OPTIONAL, INTENT(OUT) :: ierror
