For simplicity, this implementation invokes concatenate_columns at the cost of TRANSPOSE creating additional temporaries. If this code turns out to be a critical performance bottleneck, try replacing this implementation with element-by-element copying using DO CONCURRENT.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=r8k), | intent(in), | dimension(:,:) | :: | a | ||
real(kind=r8k), | intent(in), | dimension(:,:) | :: | b |