padl 接口

public interface padl

左填充输入字符串 规范


模块过程

private pure function padl_string_default(string, output_length) result(res)

使用 " "（1 个空格）左填充输入字符串

返回一个新字符串

参数

类型 意图可选 属性 名称
type(string_type), intent(in) :: string
integer, intent(in) :: output_length

返回值 type(string_type)

private pure function padl_string_pad_with(string, output_length, pad_with) result(res)

使用 'pad_with' 字符左填充输入字符串

返回一个新字符串

参数

类型 意图可选 属性 名称
type(string_type), intent(in) :: string
integer, intent(in) :: output_length
character(len=1), intent(in) :: pad_with

返回值 type(string_type)

private pure function padl_char_default(string, output_length) result(res)

使用 " "（1 个空格）左填充输入字符串

返回一个新字符串

参数

类型 意图可选 属性 名称
character(len=*), intent(in) :: string
integer, intent(in) :: output_length

返回值 character(kind=output_length), len=max)

private pure function padl_char_pad_with(string, output_length, pad_with) result(res)

使用 'pad_with' 字符左填充输入字符串

返回一个新字符串

参数

类型 意图可选 属性 名称
character(len=*), intent(in) :: string
integer, intent(in) :: output_length
character(len=1), intent(in) :: pad_with

返回值 character(kind=output_length), len=max)