Next: RESHAPE, Previous: RENAME, Up: Intrinsic Procedures
REPEAT — Repeated string concatenationRESULT = REPEAT(STRING, NCOPIES)
     | STRING | Shall be scalar and of type CHARACTER(*). | 
| NCOPIES | Shall be scalar and of type INTEGER(*). | 
CHARACTER built up from NCOPIES copies
of STRING.
               program test_repeat
            write(*,*) repeat("x", 5)   ! "xxxxx"
          end program