make
        local
            input: PLAIN_TEXT_FILE
            words_array: ARRAY [STRING_8]
            string_in, string_out: STRING_8
            i: INTEGER_32
        do
            create words_array.make_filled ("0", 1, Size)
            create input.make_open_read ("text")
            from
                input.start
                input.read_line
                i := 1
            until
                input.off
            loop
                string_in := input.last_string
                print (string_in)
                words_array [i] := string_in.deep_twin
                i := i + 1
                input.read_line
            end
            from
                i := 1
            until
                i > words_array.count
            loop
                string_out := words_array [i]
                print (string_out + "%N")
                i := i + 1
            end
        end