yaeos__auxiliar Module


Uses


Interfaces

public interface optval

  • public function optval_integer(val, default)

    Set a value to a default if it is not defined

    Arguments

    Type IntentOptional Attributes Name
    integer, intent(inout), optional :: val
    integer, intent(in) :: default

    Return Value integer

  • public function optval_real(val, default)

    Set a value to a default if it is not defined

    Arguments

    Type IntentOptional Attributes Name
    real(kind=pr), intent(inout), optional :: val
    real(kind=pr), intent(in) :: default

    Return Value real(kind=pr)


Functions

public function optval_integer(val, default)

Set a value to a default if it is not defined

Arguments

Type IntentOptional Attributes Name
integer, intent(inout), optional :: val
integer, intent(in) :: default

Return Value integer

public function optval_real(val, default)

Set a value to a default if it is not defined

Arguments

Type IntentOptional Attributes Name
real(kind=pr), intent(inout), optional :: val
real(kind=pr), intent(in) :: default

Return Value real(kind=pr)


Subroutines

public subroutine sort(array, idx)

Sort an array and return the indexes

Arguments

Type IntentOptional Attributes Name
real(kind=pr), intent(inout) :: array(:)
integer, intent(out), optional :: idx(:)