ＲＥＰＥＡＴ
copyright

green dotＲＥＰＥＡＴ

書式 REPEAT(STRING,NCOPES)
機能 文字列STRINGをNCOPES個複写し連結する。
引数
STRING：文字型
NCOPES：整数型（NCOPES>0）
戻り値 型、種別型パラメタはSTRINGと同じである。
長さは、STRINGのNCOPES倍である。

green dotサンプルプログラム

文字列'abc'を整数3個複写し連結する。 
    CHARACTER (LEN=9) :: a
    a=REPEAT('abc',3)
    WRITE(*,*) a


実行例

    abcabcabc
line-end