Data update

Task/String-prepend/COBOL/string-prepend-1.cobol

@@ -1,25 +0,0 @@
-       identification division.
-       program-id. prepend.
-       data division.
-       working-storage section.
-       1 str pic x(30) value "World!".
-       1 binary.
-        2 len pic 9(4) value 0.
-        2 scratch pic 9(4) value 0.
-       procedure division.
-       begin.
-           perform rev-sub-str
-           move function reverse ("Hello ") to str (len + 1:)
-           perform rev-sub-str
-           display str
-           stop run
-           .
-
-       rev-sub-str.
-           move 0 to len scratch
-           inspect function reverse (str)
-           tallying scratch for leading spaces
-               len for characters after space
-           move function reverse (str (1:len)) to str
-           .
-       end program prepend.

Task/String-prepend/COBOL/string-prepend-2.cobol

@@ -1,12 +0,0 @@
-       >>SOURCE FREE
-PROGRAM-ID. prepend.
-
-DATA DIVISION.
-WORKING-STORAGE SECTION.
-01  str                                 PIC X(30) VALUE "world!".
-
-PROCEDURE DIVISION.
-    MOVE FUNCTION CONCATENATE("Hello, ", str) TO str
-    DISPLAY str
-    .
-END PROGRAM prepend.