I agree 100% with you, read the thread about ⎕FIO['SomeFunctionName'] to be able to use a string as function name, that every one on this planet disagreed with me.
a ⎕name for each actual ⎕fio would be fine with me. (in fact, I want to call them by names for years, and not by number) lets all this as a though; to think about it in future. Xtian. On 2017-01-24 23:54, Elias Mårtenson wrote:
Is there anything inherently wrong with having more quad-commands? What is the reason we have to do ⎕FIO[49] instead of simply ⎕ReadLines or something like that? It's like we're going out of way to make code unreadable. I know APL is all about terseness, but I think this is going too far. Am I alone in this? Regards, Elias On 25 January 2017 at 12:36, Christian Robert <christian.rob...@polymtl.ca <mailto:christian.rob...@polymtl.ca>> wrote: In fact we should make all/most ⎕FIO[] in into parantheses things like this was working fine before ⎕FIO[49] fd← "r" ⎕fio[3] ".bashrc" fd 5 ⊣ ⎕fio[4] fd DOMAIN ERROR ⊣⎕FIO[4]fd ^ ^ well, I know now that I have to make it: ⊣ (⎕fio[4] fd) but it's a change into the previous behavior of ⎕FIO[]. It was not trying to grab the left operator of ⎕fio[4] Xtian. On 2017-01-20 10:57, Juergen Sauermann wrote: Hi Xtian, yes, one thing that I overlooked was that you should put *⎕FIO**[**49] *into parantheses because otherwise it will grab the function left of it and apply it to each line read from the file and not to the final result: * ⎕FIO[49]'x' ** ** Line 1 Line 2 Line 3 ** * * ⊃⎕FIO[49]'x' ⍝ apply ⊃ to each line**of the file (has no effect) ** Line 1 Line 2 Line 3 ** ** ** ⊃(⎕FIO[49]'x') ⍝ apply ⊃ to the final result of ⎕FIO[49]** **Line 1** **Line 2** **Line 3** * Syntactically *⎕FIO[49]* behaves like a monadic operator with an optional left function argument. The parentheses prevent it from using the left argument. In my previous example, *Z←CONVERT¨Z←⎕FIO**[49] 'filename' * the *←* had the same effect as the parentheses.* * /// Jürgen On 01/19/2017 11:10 PM, Christian Robert wrote: Juergen, Just a note, your example as of yesterday to disclose the result of ⎕FIO[49] to obtain a matrix no longer work as is. I had to add a tack (⊢) between ⎕FIO[49] and the "⊃" as in LoadSudoku2 below. LoadSudoku2←{{⊂9 9 ⍴ ⍵}⍤1 ⊃ ⊢⎕FIO[49] ⍵} LoadSudoku3←{{⊂9 9 ⍴ ⍵} ⎕FIO[49] ⍵} without the tack it would run disclose on each line which is a noop. time "a←LoadSudoku2 'Sudoku_dump.txt'" 3.370101159 time "a←LoadSudoku3 'Sudoku_dump.txt'" 2.977278584 time "a←LoadSudoku2 'Sudoku_dump.txt'" 3.142475014 <tel:3.142475014> time "a←LoadSudoku3 'Sudoku_dump.txt'" 2.966579181 the LoadSudoku3 run faster than the LoadSudoku2 ⍴a 219025 ⊃a[1 2 3] 000000000 000000000 000000000 000000008 000000009 000000009 560230400 400008120 580030100 100803000 001030000 001640008 090060000 085009760 000300005 000025010 090040200 602005041 300500706 800070006 003700000 076002000 000021050 920000076 005090021 006000010 040809000 Display ¨ ⊃a[1 2 3] ╔═══╤═══╤═══╦═══╤═══╤═══╦═══╤═══╤═══╗ ╔═══╤═══╤═══╦═══╤═══╤═══╦═══╤═══╤═══╗ ╔═══╤═══╤═══╦═══╤═══╤═══╦═══╤═══╤═══╗ ║ │ │ ║ │ │ ║ │ │ ║ ║ │ │ ║ │ │ ║ │ │ ║ ║ │ │ ║ │ │ ║ │ │ ║ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ║ │ │ ║ │ │ ║ │ │ 8 ║ ║ │ │ ║ │ │ ║ │ │ 9 ║ ║ │ │ ║ │ │ ║ │ │ 9 ║ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ║ 5 │ 6 │ ║ 2 │ 3 │ ║ 4 │ │ ║ ║ 4 │ │ ║ │ │ 8 ║ 1 │ 2 │ ║ ║ 5 │ 8 │ ║ │ 3 │ ║ 1 │ │ ║ ╠═══╪═══╪═══╬═══╪═══╪═══╬═══╪═══╪═══╣ ╠═══╪═══╪═══╬═══╪═══╪═══╬═══╪═══╪═══╣ ╠═══╪═══╪═══╬═══╪═══╪═══╬═══╪═══╪═══╣ ║ 1 │ │ ║ 8 │ │ 3 ║ │ │ ║ ║ │ │ 1 ║ │ 3 │ ║ │ │ ║ ║ │ │ 1 ║ 6 │ 4 │ ║ │ │ 8 ║ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ║ │ 9 │ ║ │ 6 │ ║ │ │ ║ ║ │ 8 │ 5 ║ │ │ 9 ║ 7 │ 6 │ ║ ║ │ │ ║ 3 │ │ ║ │ │ 5 ║ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ║ │ │ ║ │ 2 │ 5 ║ │ 1 │ ║ ║ │ 9 │ ║ │ 4 │ ║ 2 │ │ ║ ║ 6 │ │ 2 ║ │ │ 5 ║ │ 4 │ 1 ║ ╠═══╪═══╪═══╬═══╪═══╪═══╬═══╪═══╪═══╣ ╠═══╪═══╪═══╬═══╪═══╪═══╬═══╪═══╪═══╣ ╠═══╪═══╪═══╬═══╪═══╪═══╬═══╪═══╪═══╣ ║ 3 │ │ ║ 5 │ │ ║ 7 │ │ 6 ║ ║ 8 │ │ ║ │ 7 │ ║ │ │ 6 ║ ║ │ │ 3 ║ 7 │ │ ║ │ │ ║ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ║ │ 7 │ 6 ║ │ │ 2 ║ │ │ ║ ║ │ │ ║ │ 2 │ 1 ║ │ 5 │ ║ ║ 9 │ 2 │ ║ │ │ ║ │ 7 │ 6 ║ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ╟───┼───┼───╫───┼───┼───╫───┼───┼───╢ ║ │ │ 5 ║ │ 9 │ ║ │ 2 │ 1 ║ ║ │ │ 6 ║ │ │ ║ │ 1 │ ║ ║ │ 4 │ ║ 8 │ │ 9 ║ │ │ ║ ╚═══╧═══╧═══╩═══╧═══╧═══╩═══╧═══╧═══╝ ╚═══╧═══╧═══╩═══╧═══╧═══╩═══╧═══╧═══╝ ╚═══╧═══╧═══╩═══╧═══╧═══╩═══╧═══╧═══╝ I love ⎕FIO[49] ;-) Xtian. On 2017-01-19 09:17, Juergen Sauermann wrote: Hi, I have added *⎕FIO[49]* to GNU APL in *SVN 858*. *Z←⎕FIO[49] 'filename'* reads the file named *filename* line by line and stores every line of the file in one enclosed item of result vector*Z* , for example (file *x* has 3 lines): * **⍪**⊃ ⎕FIO[49] 'x' Line 1 Line 2 Line 3 * The end of line character (LF = '\n') character possibly a trailing CR = '\r' character is being removed in the process. *⎕FIO[49]* accepts an optional left function argument *F* which is a monadic conversion function. The conversion functions F is called with every line read and the result of the function is then stored in Z. for example: * ⍪⊃ {'x: ', ⍵} ⎕FIO[49] 'x'** **x: Line 1** **x: Line 2** **x: Line 3* /// Jürgen
