public interface echo
alternative to spread, it returns a new vector by replicating
the elements in the input vector val times.
Module Procedures
private pure function echo_i1(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=i1), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value integer(kind=i1),dimension(:), allocatable
private pure function echo_i2(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=i2), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value integer(kind=i2),dimension(:), allocatable
private pure function echo_i4(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=i4), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value integer(kind=i4),dimension(:), allocatable
private pure function echo_i8(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
integer(kind=i8), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value integer(kind=i8),dimension(:), allocatable
private pure function echo_r4(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
real(kind=r4), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value real(kind=r4),dimension(:), allocatable
private pure function echo_r8(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
real(kind=r8), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value real(kind=r8),dimension(:), allocatable
private pure function echo_r16(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
real(kind=r16), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value real(kind=r16),dimension(:), allocatable
private pure function echo_c4(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
complex(kind=r4), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value complex(kind=r4),dimension(:), allocatable
private pure function echo_c8(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
complex(kind=r8), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value complex(kind=r8),dimension(:), allocatable
private pure function echo_c16(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
complex(kind=r16), |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value complex(kind=r16),dimension(:), allocatable
private pure function echo_str(vec, val) result(res)
Arguments
Type | Intent | Optional | Attributes | | Name | |
character, |
intent(in), |
| dimension(:), allocatable | :: |
vec | |
integer, |
intent(in) |
| | :: |
val | |
Return Value character,dimension(:), allocatable