fill_vector Interface

public interface fill_vector

Calls

interface~~fill_vector~~CallsGraph interface~fill_vector fill_vector proc~fill_char_vector_with_scalar fill_char_vector_with_scalar interface~fill_vector->proc~fill_char_vector_with_scalar proc~fill_char_vector_with_vector fill_char_vector_with_vector interface~fill_vector->proc~fill_char_vector_with_vector proc~fill_vector_with_scalar fill_vector_with_scalar interface~fill_vector->proc~fill_vector_with_scalar proc~fill_vector_with_vector fill_vector_with_vector interface~fill_vector->proc~fill_vector_with_vector proc~fill_char_vector_with_vector->interface~fill_vector proc~fill_vector_with_vector->interface~fill_vector

Called by

interface~~fill_vector~~CalledByGraph interface~fill_vector fill_vector proc~fill_char_vector_with_vector fill_char_vector_with_vector interface~fill_vector->proc~fill_char_vector_with_vector proc~fill_vector_with_vector fill_vector_with_vector interface~fill_vector->proc~fill_vector_with_vector proc~fill_char_vector_with_vector->interface~fill_vector proc~fill_vector_with_vector->interface~fill_vector

Module Procedures

private subroutine fill_vector_with_vector(x, vals, i)

Put the vector in the vector and update the index

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(inout), dimension(:) :: x
real(kind=wp), intent(in), dimension(:) :: vals
integer, intent(inout) :: i

should be initialized to 0 before the first call

private subroutine fill_vector_with_scalar(x, val, i)

Put the value in the vector and update the index

Arguments

Type IntentOptional Attributes Name
real(kind=wp), intent(inout), dimension(:) :: x
real(kind=wp), intent(in) :: val
integer, intent(inout) :: i

should be initialized to 0 before the first call

private subroutine fill_char_vector_with_vector(x, vals, i)

Put the vector in the vector and update the index (character version)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(inout), dimension(:) :: x
character(len=*), intent(in), dimension(:) :: vals
integer, intent(inout) :: i

should be initialized to 0 before the first call

private subroutine fill_char_vector_with_scalar(x, val, i)

Put the value in the vector and update the index (character version)

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(inout), dimension(:) :: x
character(len=*), intent(in) :: val
integer, intent(inout) :: i

should be initialized to 0 before the first call