send_command Subroutine

  1. mimic_data_collect.f90
  2. mimic_data_collect
  3. send_command

public subroutine send_command(this, command, dest)

send a command via the CommLib

Arguments

TypeIntentOptionalAttributesName
class(mimic_communicator), intent(inout) :: this
integer, intent(in) :: command

integer code of the command
integer, intent(in) :: dest

destination

Contents

Source Code

send_command

Source Code

subroutine send_command(this, command, dest)
    implicit none
    class(mimic_communicator), intent(inout) :: this
    !> integer code of the command
    integer, intent(in) :: command
    !> destination
    integer, intent(in) :: dest

    call MCL_send(command, 1, MCL_COMMAND, dest)
end subroutine send_command