LGT
copyright

green dotLGT

書式 LGT(STRING_A,STRING_B)
機能 ASCII大小順序で文字列STRING_Aと文字列STRING_Bを比較する。
条件が満たされたとき論理値.TRUE.、そうでないとき.FALSE.を返す。
STRING_AとSTRING_Bよりも後であるとき
引数 STRING_A,STRING_B:基本文字型
戻り値 型、種別型パラメタは基本論理型である。

green dotサンプルプログラム

'ONE','TWO'のASCII大小順序を比較する。
    CHARACTER (LEN=3) :: a,b
    a='ONE'; b='TWO'
    WRITE(*,*) LGE(a,b),LGT(a,b),LLE(a,b),LLT(a,b)

実行例
F F T T
line-end