rand_basis Interface

public interface rand_basis

This interface provides methods to create an array X of random abstract_vector. It is a simple wrapper around X(i)%rand(ifnorm).

Example

    type(my_real_vector), dimension(10) :: X
    logical                             :: ifnorm = .true.

    ! ... Your code ...

    call rand_basis(X, ifnorm)

    ! ... Your code ...

Module Procedures

private impure elemental subroutine rand_basis_rsp(X, ifnorm)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rsp), intent(inout) :: X
logical, intent(in), optional :: ifnorm

private impure elemental subroutine rand_basis_rdp(X, ifnorm)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_rdp), intent(inout) :: X
logical, intent(in), optional :: ifnorm

private impure elemental subroutine rand_basis_csp(X, ifnorm)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_csp), intent(inout) :: X
logical, intent(in), optional :: ifnorm

private impure elemental subroutine rand_basis_cdp(X, ifnorm)

Arguments

Type IntentOptional Attributes Name
class(abstract_vector_cdp), intent(inout) :: X
logical, intent(in), optional :: ifnorm