copy Interface

public interface copy

copy provides a blas-less implementation of xcopy where x is (i,s,d) icopy, scopy, dcopy if you built pic with BLAS use the copy interface provided there, I will not beat BLAS copy is implemented for (int32, int64, sp, dp) for 1 and 2d arrays of the same types

Usage: call copy(destination, source, [optional] threaded)

This subroutine is threaded for performance purposes if threaded is set to .true.

Note

If this subroutine is called inside a omp threaded region it will run serially because of nested parallelism

Calls

interface~~copy~~CallsGraph interface~copy copy proc~copy_matrix_dp copy_matrix_dp interface~copy->proc~copy_matrix_dp proc~copy_matrix_int32 copy_matrix_int32 interface~copy->proc~copy_matrix_int32 proc~copy_matrix_int64 copy_matrix_int64 interface~copy->proc~copy_matrix_int64 proc~copy_matrix_sp copy_matrix_sp interface~copy->proc~copy_matrix_sp proc~copy_vector_dp copy_vector_dp interface~copy->proc~copy_vector_dp proc~copy_vector_int32 copy_vector_int32 interface~copy->proc~copy_vector_int32 proc~copy_vector_int64 copy_vector_int64 interface~copy->proc~copy_vector_int64 proc~copy_vector_sp copy_vector_sp interface~copy->proc~copy_vector_sp

Module Procedures

private subroutine copy_vector_int32(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(inout) :: dest(:)
integer(kind=int32), intent(in) :: source(:)
logical, intent(in), optional :: threaded

private subroutine copy_vector_int64(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
integer(kind=int64), intent(inout) :: dest(:)
integer(kind=int64), intent(in) :: source(:)
logical, intent(in), optional :: threaded

private subroutine copy_vector_sp(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
real(kind=sp), intent(inout) :: dest(:)
real(kind=sp), intent(in) :: source(:)
logical, intent(in), optional :: threaded

private subroutine copy_vector_dp(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: dest(:)
real(kind=dp), intent(in) :: source(:)
logical, intent(in), optional :: threaded

private subroutine copy_matrix_int32(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(inout) :: dest(:,:)
integer(kind=int32), intent(in) :: source(:,:)
logical, intent(in), optional :: threaded

private subroutine copy_matrix_int64(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
integer(kind=int64), intent(inout) :: dest(:,:)
integer(kind=int64), intent(in) :: source(:,:)
logical, intent(in), optional :: threaded

private subroutine copy_matrix_sp(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
real(kind=sp), intent(inout) :: dest(:,:)
real(kind=sp), intent(in) :: source(:,:)
logical, intent(in), optional :: threaded

private subroutine copy_matrix_dp(dest, source, threaded)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: dest(:,:)
real(kind=dp), intent(in) :: source(:,:)
logical, intent(in), optional :: threaded