General description of the communication pattern to use.
Depending on the chosen style, different exchange implementations are used. This data type provides the appropriate function pointers for initialization, finalization and exchange of the buffers.
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=40), | public | :: | style | ||||
procedure(tem_exchange_long), | public, | nopass, pointer | :: | exchange_long | |||
procedure(tem_commbuf_long_init), | public, | nopass, pointer | :: | initbuf_long | |||
procedure(tem_commbuf_long_fin), | public, | nopass, pointer | :: | finbuf_long | |||
procedure(tem_exchange_int), | public, | nopass, pointer | :: | exchange_int | |||
procedure(tem_commbuf_int_init), | public, | nopass, pointer | :: | initbuf_int | |||
procedure(tem_commbuf_int_fin), | public, | nopass, pointer | :: | finbuf_int | |||
procedure(tem_exchange_real), | public, | nopass, pointer | :: | exchange_real | |||
procedure(tem_commbuf_real_init), | public, | nopass, pointer | :: | initbuf_real | |||
procedure(tem_commbuf_real_fin), | public, | nopass, pointer | :: | finbuf_real |
type tem_commPattern_type character(len=40) :: style procedure(tem_exchange_long), nopass, pointer :: exchange_long procedure(tem_commbuf_long_init), nopass, pointer :: initbuf_long procedure(tem_commbuf_long_fin), nopass, pointer :: finbuf_long procedure(tem_exchange_int), nopass, pointer :: exchange_int procedure(tem_commbuf_int_init), nopass, pointer :: initbuf_int procedure(tem_commbuf_int_fin), nopass, pointer :: finbuf_int procedure(tem_exchange_real), nopass, pointer :: exchange_real procedure(tem_commbuf_real_init), nopass, pointer :: initbuf_real procedure(tem_commbuf_real_fin), nopass, pointer :: finbuf_real end type tem_commPattern_type