Text : List : String = <> ..

Call LinesIn File_name READ_FILE ( String : 
                                            Text .= <- String, 5, String._
                                            [ String, 1, 4 = '-#- ' ]
                                 )
