concatenate_columns Module Procedure

module procedure concatenate_columns pure module function concatenate_columns(a, b) result(concatenated)

Using RESHAPE rather than manipulating array elements directly frees the compiler to decide the particular order of array element references that best exploits the given platform. Alternatively, DO CONCURRENT could instead free the compiler to order element accesses however is best. Trade-off: RESHAPE requires the creation of temporary array results but RESHAPE is likely to have more mature compiler support than DO CONCURRENT. If this code turns out to be a critical performance bottleneck, try replacing this implementation with element-by-element copying using DO CONCURRENT.

Arguments

Type IntentOptional AttributesName
real(kind=r8k), intent(in), dimension(:,:):: a
real(kind=r8k), intent(in), dimension(:,:):: b

Return Value real(kind=r8k), dimension(:,:),allocatable


Called by

proc~~concatenate_columns~~CalledByGraph proc~concatenate_columns concatenate_columns interface~concatenate_columns concatenate_columns interface~concatenate_columns->proc~concatenate_columns interface~operator(.catcolumns.) operator(.catcolumns.) interface~operator(.catcolumns.)->interface~concatenate_columns proc~concatenate_rows concatenate_rows proc~concatenate_rows->interface~concatenate_columns interface~concatenate_rows concatenate_rows interface~concatenate_rows->proc~concatenate_rows interface~operator(.catrows.) operator(.catrows.) interface~operator(.catrows.)->interface~concatenate_rows

Contents

None