gather_bond_count Subroutine

  1. mimic_data_collect.f90
  2. mimic_data_collect
  3. gather_bond_count

public subroutine gather_bond_count(this, bonds_pcode)

gather bond count from all clients

Arguments

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

Integer data to gather

Contents

Source Code

gather_bond_count

Source Code

subroutine gather_bond_count(this, bonds_pcode)

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

    call this%gather_int(bonds_pcode, MCL_SEND_NUM_BONDS)

end subroutine gather_bond_count