ＬＥＮ
copyright

green dotＬＥＮ

書式LEN(STRING)
機能 STRINGが配列でないとき、STRING中の文字数を求める。
STRINGが配列のとき、STRINGの要素中の文字数とする。
引数 STRING：文字型
戻り値 型、種別型パラメタは基本整数型である。

green dotサンプルプログラム

文字列中の文字数を求める。 
    CHARACTER (LEN=10)             :: a
    CHARACTER (LEN=5),DIMENSION(2) :: b
    a='1234567890'; i=LEN(a)  ! 文字列aの文字数は10である
    b(1)=a(1:5); b(2)=a(6:10); j=LEN(b)
                              ! 配列bの要素の文字数は5である
    WRITE(*,*) i,j


実行例

   10 5
line-end