lge(x, y)：词法上大于或等于

词法上大于或等于。

声明

语法

retval = lge(x, y)
function lge(x, y)

参数

x 类型字符的输入值。

y 类型字符的输入值。

x 和 y 可以看作是字符串 A 和字符串 B。

返回值

返回值是逻辑 true 或 false 类型。

如果 x 字符串在词法上大于或等于 y，则为 True。

如果不是，则为False。

描述

lge(x, y) 确定输入字符串 x 在词法上是否大于或等于输入字符串 y。 比较的两个字符串被解释为包含 ASCII 字符代码。

类型

参数类型应该是字符文字类型。

module lfortran_intrinsic_string
    use, intrinsic :: iso_fortran_env, only: i64 => int64
implicit none

interface repeat
    module procedure repeati32, repeati64
end interface

contains

function lge(x, y) result(r)
    character(len=*),intent(in) :: x
    character(len=*),intent(in) :: y
    logical :: r
end function

示例

program intrinsics_lge
    implicit none
    character(len = 10) :: s1 = 'abcde'
	character(len = 10) :: s2 = 'xyz'
    character(len = 10) :: s3 = 'AB'
	character(len = 10) :: s4 = 'AAB'
	print *, lge(s1, s2)
end program

结果：

false
true

也可以看看

len_trim.