gather_type_count Subroutine

  1. mimic_data_collect.f90
  2. mimic_data_collect
  3. gather_type_count

public subroutine gather_type_count(this, types_pcode)

gather atom types count from all clients

Arguments

TypeIntentOptionalAttributesName
class(mimic_communicator), intent(inout) :: this
integer, intent(out), dimension(:), target:: types_pcode

Integer data to gather

Contents

Source Code

gather_type_count

Source Code

subroutine gather_type_count(this, types_pcode)

    class(mimic_communicator), intent(inout) :: this
    !> Integer data to gather
    integer, dimension(:), target, intent(out) :: types_pcode

    call this%gather_int(types_pcode, MCL_SEND_NUM_ATOM_TYPES)

end subroutine gather_type_count