set_to_key_t Subroutine

public subroutine set_to_key_t(this, k)

Arguments

Type IntentOptional Attributes Name
class(key_t), intent(inout) :: this
character(len=*), intent(in) :: k

Contents

Source Code

set_to_key_t

Source Code

    subroutine set_to_key_t(this, k)
        class(key_t), intent(inout)  :: this
        character(len=*), intent(in) :: k
        this%k = adjustl(k)
    end subroutine set_to_key_t