copy_key 子例程

public pure subroutine copy_key(old_key, new_key)

将键 old_key 的内容复制到键 new_key (规范)

参数：old_key - 输入键 new_key - old_key 的输出副本

参数

类型 意图可选 属性 名称
type(key_type), intent(in) :: old_key
type(key_type), intent(out) :: new_key

源代码

    pure subroutine copy_key( old_key, new_key )
!! Version: Experimental
!!
!! Copies the contents of the key, old_key, to the key, new_key
!! ([Specifications](../page/specs/stdlib_hashmaps.html#copy_key-returns-a-copy-of-the-key))
!!
!! Arguments:
!!     old_key - the input key
!!     new_key - the output copy of old_key
        type(key_type), intent(in)  :: old_key
        type(key_type), intent(out) :: new_key

        new_key % value = old_key % value

    end subroutine copy_key