receive_snapshot.f90

module receive_snapshot_m

  implicit none

contains

  subroutine receive_snapshot(s, source, tag)

    use derived_types, only: snapshot

    type(snapshot), intent(out):: s
    integer, intent(in):: source, tag

    !-----------------------------------------------------------

  end subroutine receive_snapshot

end module receive_snapshot_m