Re: Selective specification with Quad IO fails

Hi Jürgen, thank you. Best Regards Hans-Peter Am 28.08.24 um 13:40 schrieb Dr. Juergen Sauermann: Hi Hans-Peter, thanks, fixed in *SVN 1779*. Best Regards, Jürgen On 8/25/24 18:35, Hans-Peter Sorge wrote: Hello Jürgen, the case stems from Simple_SQL.apl I was loading the Workspace, did

Re: Selective specification with Quad IO fails

Peter, according to the IBM language reference page 41 is selective specification limited to specific functions, and *'.'* is unfortunately not one of them. I will look into making this working, but it could be tricky and take a while, In the meantime you could use *x['y']* ins

Selective specification with Quad IO fails

Hi, Just a simple test:   x.y ← 1 2 3   x.y 1 2 3   x.y[1] 1   1⊃x.y 1   ⎕IO⊃x.y 1   (⎕IO⊃x.y)←⊂ 'abc' SYNTAX ERROR+   (⎕IO⊃x.y)←⊂'abc'   ^    ^   (1⊃x.y)←⊂ 'abc'   x.y  abc 2 3 Greetings Hans-Peter

Re: GNU APL 1.9 Released

Jürgen,  thank you! Am 30.06.24 um 13:41 schrieb Dr. Jürgen Sauermann: Hi, I am happy to announce that *GNU APL 1.9* has been released. GNU APL is a free implementation of the ISO standard 13751 aka. "Programming Language APL, Extended". The 1.9 release contains: * Bug fixes Have fun! Dr

Re: Error message references wrong line

Jürgen, Thank you. Best Regards Hans-Peter Am 10.03.24 um 12:16 schrieb Dr. Jürgen Sauermann: Hi Hans-Peter, thanks, fixed in *SVN 1764*. Best Regards, Jürgen On 3/6/24 15:24, Hans-Peter Sorge wrote: Hi, Just for fun i did some "Home work" for my wife. Kids in  school were to

Error message references wrong line

Hi, Just for fun i did some "Home work" for my wife. Kids in  school were to guess (and calculate) numbers. For the calculation part I came up with an APL Funktion (No more school - right ?-). [0]   Mathe_Bug [1]   L←278 213 1046 2884 391 [2]   R←87 32 49 479 324 [3]   E←L∘.× R  ⍝ Possible cal

Re: Execute on empty element produces a stack trace

Hi Jürgen, thank you a lot. Best Regards, Hans-Peter Am 29.09.23 um 16:08 schrieb Dr. Jürgen Sauermann: Hi Peter, thanks, fixed in *SVN 1734*. Best Regards, Jürgen On 9/27/23 23:08, Hans-Peter Sorge wrote: Hi, *This gives a stack trace:*     X←0 2⍴ ⊂'0'

Re: )LOAD dumped WS had a name clash - ⎕FC affects )DUMP

created with this bug then maybe the following can fix them: *)CLEAR** **∇Z←A E B** ** Z←A×10⋆B** **∇** **)COPY broken_WS** **)DUMP broken_WS** * Best Regards, Jürgen On 9/30/23 15:54, Hans-Peter Sorge wrote: Hi Jürgen, .. not every key-stroke. But this one:   ⎕FC←'.,⋆0_*-*'  

Re: )LOAD dumped WS had a name clash - ⎕FC affects )DUMP

l and .apl files are human readable). GNU APL tends to use uppercase E and ¯ (like 1E¯13) in .apl files and lowercase e and ASCII - (like 1e-13) in .xml files. Therefore the combination of uppercase E and ASCII - is not supposed to occur in either file format. Best Regards, Jürgen On 9/29/23 14:28,

Re: )LOAD dumped WS had a name clash - intermittend

L tends to use uppercase E and ¯ (like 1E¯13) in .apl files and lowercase e and ASCII - (like 1e-13) in .xml files. Therefore the combination of uppercase E and ASCII - is not supposed to occur in either file format. Best Regards, Jürgen On 9/29/23 14:28, Hans-Peter Sorge wrote: Hi, I have a fu

)LOAD dumped WS had a name clash - intermittend

Hi, I have a function E (as simple as in test below)   in my workspace (WS size 2.9MB). )DUMP and )loading it produces an error: )LOAD DUMPED 2023-09-28  19:44:54 (GMT+2) VALENCE ERROR   ⎕CT←1 E-13   ^  ^ Just )ERASE E ∇E ∇  ⍝ recreate ist )DUMP )LOAD ... fix

Execute on empty element produces a stack trace

Hi, *This gives a stack trace:*     X←0 2⍴ ⊂'0'     ⍎¨X[;1] == Assertion failed: start <= body_from_to.low in Function:  set_error_info in file:  Executable.cc:602 C/C++ call stack: *** usele

Re: Output variants for pick and index operators

*⊃* give different results in GNU APL and also in IBM APL2 (PC version). Best Regards, Jürgen On 3/14/23 10:12 PM, Hans-Peter Sorge wrote: Hi Jürgen, looks like I have plenty of time, however, it's being usefully invested:-) (SVN 1660) This displays as expected.   X (8⎕CR  X ←1 2 3

Output variants for pick and index operators

Hi Jürgen, looks like I have plenty of time, however, it's being usefully invested:-) (SVN 1660) This displays as expected.   X (8⎕CR  X ←1 2 3 ⊃¨⊂'A' 'CD' 'EF')  A CD EF   ┌→──┐    │A ┌→─┐ ┌→─┐│    │  │CD│ │EF││    │  └──┘ └──┘│    └ϵ──┘ A..CD 

Re: Reassignment of a nested array element

A  1 2 3 4 5   1 1 1     1 1 1     1 1 1   (1/3⊃V) ≡ 3⊃V 1   (3⊃V)←1   (1/3⊃V) ≡ 3⊃V 1* Best Regards, Jürgen On 3/12/23 7:02 PM, Hans-Peter Sorge wrote: Hi Jürgen, back from wintry Hahnenklee/Harz here are my thoughts. In ref.:  "like a variable

Re: Reassignment of a nested array element

e that in one way or the other seems not really satisfactory but somewhat arbitrary. I would therefore propose to avoid such constructs for the sake of portability. Best Regards, Jürgen On 3/9/23 6:56 PM, Hans-Peter Sorge wrote: Hi Jürgen, thank you for considering it. Your work is admirabl

Re: Reassignment of a nested array element

3/8/23 9:05 PM, Hans-Peter Sorge wrote: Hello Jürgen, sorry that I'm so insistent in APL2 Programming:Language Reference it is stated: Selective Specification:Compress can be used for selective specification: M←32ρι6 M 12 34 56 (10/M)←'ABC' M A2 B4 C6 Using our example V V←

Re: Reassignment of a nested array element

length 1 axis added by 1/ when*X* is scalar) and therefore *(3⊃V)←1 *and *(1/3⊃V)←1 *should IMHO yield the same. Best Regards, Jürgen On 3/6/23 9:16 PM, Hans-Peter Sorge wrote: Hello Jürgen, I agree with your case 1/2  Statement. The examples I was showing is actually "off by 1".

Re: Reassignment of a nested array element

DOMAIN ERROR in this case. Best Regards, Jürgen On 3/6/23 9:16 PM, Hans-Peter Sorge wrote: Hello Jürgen, I agree with your case 1/2  Statement. The examples I was showing is actually "off by 1".  I was referring to (1/3⊃V)←1 having a←

Re: Reassignment of a nested array element

room for interpretation. However, both APL2 and Dyalog agree on case 1 and therefore I changed GNU APL to behave the same. Best Regards, Jürgen On 3/4/23 8:25 PM, Hans-Peter Sorge wrote: Hi, Works as expected ⊃'Sue' 'Maria' 'Annalisa' is an array 3 by 8. ⊂⊃&#x

Re: Reassignment of a nested array element

2 3 4 Sue 5 6 7 8 Maria 9 10 11 12 Annalisa 5 4 1 2 3 4 Susan 5 6 7 8 Mary 9 10 11 12 Annalisa APL+Win 4.0 var←0 0 0 ⋄ (1⊃var)←5 4 ⋄ (2⊃var)←3 4⍴⍳12 ⋄ (3⊃var)←⊃'Sue' 'Maria' 'Annalisa' ⋄ var ⋄ (3⊃var)←⊂⊃'Susan

Re: Reassignment of a nested array element

Hi, Works as expected ⊃'Sue' 'Maria' 'Annalisa' is an array 3 by 8. ⊂⊃'Susan' 'Mary' 'Annalisa' is an element (⊂) of a 3 by 8  array (⊃'Susan' 'Mary' 'Annalisa' ). Finally each element in  ⊃'Sue' 'Maria' 'Annalisa' gets assigned an array of  ⊃'Susan' 'Mary' 'Annalisa' Greetings Hans-Peter

Execute Each on Enclose '.0' errors out

Hi, I have some bigger data collections to analyze. Zeros are represented as .000 within the records. Reading the files with ⎕FIO[49], I get a vector of vector with numbers. ⊃⍎¨ file should return the matrix of numbers. ⍎¨ fails with RANK ERROR on .000 Short extract: ⍎¨⊂'.000' RANK ERROR+ μ-

Re: Unexpectedly offline

Jürgen, gute Besserung. Am 22.01.23 um 14:07 schrieb Dr. Jürgen Sauermann: Gentlemen, I am sorry for not responding earlier to any emails to bug-apl@gnu.org. I was unexpectedly taken offline after new year and I am now online again, although only for a short period.  Just having returned from

Re: APL2 code no longer works

Hi, Parse2 works for me. Albeit a rather simple test. What was your data you parsed?? To explain: r←(1↑d),(1↑d),v   ⍝⍝ add 2 time the delimiter in front of vector. If d is a vector, take the first element. If d is a matrix, fail. ⍝ normally use a different name than the return var. Just improve

Re: meta.apl

Hi Bill, where does utl come from? Regards Hans-Peter Am 07.03.22 um 16:14 schrieb Bill Daly: Hi Jürgen Please look at the attached log.  This isn't the first APL that I've stubbed my to on quad-quote and I don't have an opinion on what is right. Let me know if you change how quad-quote wo

../NamedObject.hh:85:1: error: version control conflict marker in file

Hi, I get a compile error. Fedora 35,  Kernel 5.16.12-200.fc35.x86_64 In file included from ../Function.hh:27, from ../PrimitiveFunction.hh:27, from ../PrimitiveOperator.hh:24, from ../Quad_FIO.hh:29, from file_io.cc:26: ../NamedO

Re: Absolute limits of rank 2 bool matrix size in GNU APL?

Hi Russ, that's a good idea. Thank you. Regards, Hans-Peter Am 01.01.22 um 03:53 schrieb Russtopia: Hi Hans-Peter, do you mind if I post a cleaned-up version of your solution to the word count/frequency problem on Rosettacode.org ? http://rosettacode.org/wiki/Word_frequency That was the o

Re: Bug-apl Digest, Vol 99, Issue 13

your Subject line so it is more specific than "Re: Contents of Bug-apl digest..." Today's Topics:    1. Re: Absolute limits of rank 2 bool matrix size in GNU APL?       (Hans-Peter Sorge)    2. Re: Absolute limits of rank 2 bool

Re: Absolute limits of rank 2 bool matrix size in GNU APL?

Hi Rus, looks like the outer product is a not needed - you have the unique words and along the line you got the word count too. you take the sorted word vector swv ←'aa' 'bb' 'bb' 'cc' 'cc' 'ff' 'gg' then you create a partition vector from it pv←+\1,~2≡/swv pv 1 2 2 3 3 4 5 partition for wc

Re: nested array formating is inconsistent

e to leave matters as they are. Best regards, Jürgen On 8/27/21 12:48 AM, Hans-Peter Sorge wrote: Hi, thank you for your insight. ⍝ However I'm not convinced. ⍝ Comparing expr. 1 (≡ 2)   (⊂1 1)⍴ ¨2 2⍴1  1   1  1   1 ⍝ to expr. 2  (≡ 3)   ⊂¨(⊂1 1)⍴ ¨2 2⍴1   1   1   1   1 ⍝

Re: nested array formating is inconsistent

ine too much in *⊂2 2 ⍴ e* (even though that way it looks a little nicer). Best Regards, Jürgen On 8/26/21 11:29 AM, Hans-Peter Sorge wrote: Hi, ⍝ just a simple matrix   i∘.+i←¯1+⍳2 0 1 1 2 ⍝ make it an element   ⎕ ← e ← ⊂i∘.+i←¯1+⍳2  

nested array formating is inconsistent

Hi, ⍝ just a simple matrix   i∘.+i←¯1+⍳2 0 1 1 2 ⍝ make it an element   ⎕ ← e ← ⊂i∘.+i←¯1+⍳2  0 1  1 2 ⍝ matrix of matrixes   2 2 ⍴ e  0 1   0 1  1 2   1 2  0 1   0 1  1 2   1 2 ⍝ enclose the matrix of matrixes indents nicely ...   ⊂ 2 2 ⍴ e   0 1   0 1   1 2   1 2  

Re: Bug in nested array output.

Hi Jürgen, thank you. Best Regards Hans-Peter Am 19.08.21 um 13:12 schrieb Dr. Jürgen Sauermann: Hi Hans-Peter, thanks, fixed in *SVN 1483*. Best Regards, Jürgen On 8/17/21 8:35 PM, Hans-Peter Sorge wrote: Hi, for m←4 4 ⍴ 1 I get:   3 ⎕CR  (2 2 2⍴m) m ┏→━━┓ ┏→━━┓ ↓1 1┃ ↓1 1 1

Bug in nested array output.

Hi, for m←4 4 ⍴ 1 I get:   3 ⎕CR  (2 2 2⍴m) m ┏→━━┓ ┏→━━┓ ↓1 1┃ ↓1 1 1 1┃ ┃1 1┃ ┃1 1 1 1┃ ┃   ┃ ┃1 1 1 1┃ ┃1 1┃ ┃1 1 1 1┃ ┃1 1┃ ┗━━━┛ ┗━━━┛ ⍝ Something is missing   (2 2 2⍴m) m  1 1    1 1 1 1  1 1    1 1 1 1  1 1    1 1 1 1  1 1 Best Regards Hans-Peter

Re: better apl array coding

Hi, if this is, what you want? ar←4 4⍴11 12 13 14 21 22 23 24 31 32 33 34 41 42 43 44 ⍝ btw: ar← (10×⍳4)∘.+⍳4 a←1 2 3 4 4 3 2 1 b←1 2 3 4 4 3 2 1       ,[1.1]'lp' 'ar' ar 'a' a 'b' b (d,⌽d←1 1⍉ar) It is not quite clear, what your intend is. First:   

Re: Broken commandline

Hi, I have opened a bug report: https://bugzilla.redhat.com/show_bug.cgi?id=1967789 <https://bugzilla.redhat.com/show_bug.cgi?id=1967789> Best Regards Hans-Peter Am 02.06.21 um 11:23 schrieb Hans-Peter Sorge: Hi, I am on Fedora 34 now (apl SVN: 1198:1472M) The apl font partially fa

Re: Broken commandline

ri, Jun 04, 2021 at 12:47:31AM +0200, Hans-Peter Sorge wrote: However, there are "graphically oriented" UTF characters (including ⍝⊖⍟⍱), that take two character positions when being displayed and take one character position when being selected. So it's not an APL character / font

Re: Broken commandline

ions follow suit here (in not supporting overstrikes) while firefox (or maybe X) tries to. Again, GNU APL was specifically designed to not not need APL fonts in the first place and using them nevertheless will therefore cause more trouble then help. Best Regards, Jürgen On 6/2/21 11:23 AM, H

Re: Broken commandline

sing M-x gnu-apl. https://github.com/lokedhs/gnu-apl-mode <https://github.com/lokedhs/gnu-apl-mode> This should hopefully fix your problems. Regards, Elias On Wed, 2 Jun 2021 at 17:23, Hans-Peter Sorge mailto:hanspeterso...@netscape.net>> wrote: Hi, I am on Fedora 34 n

Broken commandline

Hi, I am on Fedora 34 now (apl SVN: 1198:1472M) The apl font partially fails to work with keyboard layout apl. The "over strike characters" ⌽⍉⍟⍝⍱⍲ ,when entered in a terminal, appear in half The left half of the character is being displayed when entered. The right half appears when space

Improvements to gnuapl

Hi, I would modify the data model and/or process graph or use an adequate programming language. In my opinion, having to rely on data content to control program flow is 'costly'. (My be one reason too, that APL has no language specific regular expressions). My highest priority for APL would

Re: Documentation of the BOXING values.

Hi, just my opinion... The list of programming languages I used to use is looong. When APL got deployed at IBM, all employees were supposed to learn APL - for a supposedly more efficient work environment. Few were able to efficiently use it. Production Control code -> I modified it ~400 lin

Re: APL Christmas 2020 doodle: Tree

Hi, in GNU APL  monadic ↑ takes the first element ( that is of a vector or higher ranking matrix, try ↑ 3 3 3 ⍴'abc' 'cde'). As the resulting vector has three elements you end up replicating them 9, 2, 9 times ( 9 2 9 / 'abc'). So there is no application of the replication vector 9 2 9 to all

Re: Library settings fail

-Peter, thanks, see below. Best Regards, Jürgen On 12/24/20 12:25 AM, Hans-Peter Sorge wrote: Hi, A bit strange, as I did not notice it up to now. This is the starting point [joy@joyw520 WSTEST]$ ll insgesamt 4 drwxrwxr-x. 2 joy joy 4096 23. Dez 23:34 wslib2 Creating a

Library settings fail

Hi, A bit strange, as I did not notice it up to now. This is the starting point [joy@joyw520 WSTEST]$ ll insgesamt 4 drwxrwxr-x. 2 joy joy 4096 23. Dez 23:34 wslib2 Creating a name . [joy@joyw520 WSTEST]$ touch wslib2/LLLTTT.apl Starting APL .

Re: Structured Variable Assignment - )more

tive than theoretically needed. Best Regards, Jürgen On 12/16/20 1:16 PM, Hans-Peter Sorge wrote: Hi Jürgen, Concerning the erasure of a variable, other language have such functionality too. Like "unset VAR" or "VAR=", by that ignoring variable content. Even ⎕EX does not

Structured Variables - a DB use case

Hi I have created a DB example exploring structured variables: ⍝ setting the connect parameters MY_DB.DB_CONNECT.DB_NAME←'db_name' MY_DB.DB_CONNECT.DB_HOST←'172.0.0.1' MY_DB.DB_CONNECT.DB_USER←'me' MY_DB.DB_CONNECT.DB_PASSWD←'t0tal53(rt' ⍝ Do the connect. Use root name only. BD_CONNECT.DB_HNDL←

Structured Variable Assignment - )more

Hi Jürgen, Concerning the erasure of a variable, other language have such functionality too. Like "unset VAR" or "VAR=", by that ignoring variable content. Even ⎕EX does not care. Protecting names is done by )PCOPY. or ⍫, though locking a function renders it unreadable. And as I mentioned,

On assignment using structured variables - was Incomplete value at Symbol.cc:130

Hi Hans-Peter, thanks a lot for your feedback. See my comments below. Best Regards, Jürgen On 12/14/20 4:39 PM, Hans-Peter Sorge wrote: Hi, I could not resist to experiment.   )clear CLEAR WS     A←0     A.A←1 DOMAIN ERROR+     A.A←1 ^ ^   )clear CLEAR WS    

Syntax error in function using structured name assignment

Hi, just an experiment to see what can be done ... Works like a charm - mostly :-) ⍝ --- an arbitrary function.   ∇example[⎕]     ∇ [0]   Z←example name_struct [1]   Z← name_struct [2]   Z.N ← 'new' [3]   ⎕EX 'Z.K'     ∇ ⍝ - some data   A.B.C.D ← 14    

Structured variables - inconsistency in depth expression.

Hi, there is some inconsistency in depth reporting:   ≡ U.V.W.X.Y.Z←0 0   ≡ U 6   ≡ U.V.W.X.Y.Z←,0 1   ≡ U 6 ⍝ should be 7   ??   ≡ U.V.W.X.Y.Z←⊂,0 2   ≡ U 7 ⍝ should be 8   ?? Q: Does depth on structured variables not have a different meaning? This takes

Incomplete value at Symbol.cc:130

Hi, I could not resist to experiment.   )clear CLEAR WS     A←0     A.A←1 DOMAIN ERROR+     A.A←1 ^ ^   )clear CLEAR WS   A.A←1   A←0  ⍝ Just replacing content of A.   B.B←2   A←B.B    ⍝ Generates a trace. - probably should be A.B ←→ 2 Inco

Re: Structured variables

Hi, wildest dreams come true. Fits right into the stuff I'm working on. Best Regards Hans-Peter Am 13.12.20 um 16:27 schrieb Dr. Jürgen Sauermann: Hi, I created a new experimental feature in GNU APL: Structured variables. See: *info apl* section 3.35.1 or: https://www.gnu.org/software/a

Re: Offending token

command) then the current behaviour remains because the file will not change itself if it contains an invalid function. *SVN 1374.** * Best Regards, Jürgen On 12/9/20 2:44 PM, Hans-Peter Sorge wrote: Hi, ⍝ as expected:   ∇FUN [1] →←∇   FUN SYNTAX ERROR FUN[1]  →←     ^^ ⍝ Just came

Re: Quad FIO[56] fails writing apl chars

, Jürgen On 12/9/20 2:32 PM, Hans-Peter Sorge wrote: Hi, ⍝ This writes apl chars   some_apl_chars ← '¨¯⍒⍋⌽⍉⊖≠∨∧\⌹@⍵∊⍴t↑↓⍳○p←~'   fh←'w' ⎕FIO[3] ''   some_apl_chars ⎕FIO[43] fh 60   ⎕FIO[4] fh 0 ⍝ This returns them:   ⎕FIO[49] '&#

Offending token

Hi, ⍝ as expected:   ∇FUN [1] →←∇   FUN SYNTAX ERROR FUN[1]  →←     ^^ ⍝ Just came up in a typo:   ∇FUN [2] [1]   →NEXTLINE: [2] NEXTLINE: [3] ∇ Line 1 Offending token: (tag > TC_MAX_PERM) 0x43030019 : Statement: `→  `'NEXTLINE  `: DEFN ERROR+   ∇FUN ^ ⍝ The chan

Quad FIO[56] fails writing apl chars

Hi, ⍝ This writes apl chars   some_apl_chars ← '¨¯⍒⍋⌽⍉⊖≠∨∧\⌹@⍵∊⍴t↑↓⍳○p←~'   fh←'w' ⎕FIO[3] ''   some_apl_chars ⎕FIO[43] fh 60   ⎕FIO[4] fh 0 ⍝ This returns them:   ⎕FIO[49] ''  ¨¯⍒⍋⌽⍉⊖≠∨∧\⌹@⍵∊⍴t↑↓⍳○p←~ ⍝ I did not notice so far that ⎕FIO[56] fails in writing APL cha

Re: Attention: Saving workspaces

Hi, is there a way that )DUMP preserves function fidelity - that is - keep empty lines and indents? It would improve readability a lot by eg. separating code and next comment by a space line. Best Regards Hans-Peter Am 08.11.20 um 20:07 schrieb Dr. Jürgen Sauermann: Hi everybody, I am curr

Re: Quad FX library_function causes stack trace

Hans-Peter, thanks, see below. Best Regards, Jürgen On 12/4/20 10:54 AM, Hans-Peter Sorge wrote: Hi, ⎕FX  'library_function'     should probably return 'Domain Error' No. It defines a niladic function named library_function with an empty function body.   'libe

Quad FX library_function causes stack trace

Hi, ⎕FX  'library_function'     should probably return 'Domain Error'   'libedif2.so' ⎕fx 'edif2' edif2 ⍝ just happened to be an accident ...   ⎕fx 'edif2' == Assertion failed: old_ufun in Function:  fi

Re: Fwd: Operator binding

nswer the tricky ones). Best Regards, Jürgen On 12/3/20 2:26 PM, Hans-Peter Sorge wrote: Sorry, did not hit the mailing list... Hi, frankly I try to find out what it does...    4/2 2⍴⍳4 1 1 1 1 2 2 2 2 3 3 3 3 4 4 4 4 basically replicates the last column    4//2 2⍴⍳4  2 2 2 2  4

Re: )DUMP entry with syntax error

irectory **: *find -exec sed -i 's/IO+)/⎕IO+⍬)/g' {} \;* Please note that the character to be inserted is ⍬(Zilde) and not 0(Zero); the difference is difficult to see with some fonts. Best Regards, Jürgen On 12/3/20 6:35 PM, Hans-Peter Sorge wrote: Hi, a short test gives: $ apl

)DUMP entry with syntax error

Hi, a short test gives: $ apl -q   X←⊂'XXX'   )WSID DUMP_TEST WAS CLEAR WS   )DUMP 2020-12-03  18:20:00 (GMT+1)   )OFF )load DUMP_TEST.apl DUMPED 2020-12-03  18:20:00 (GMT+1) SYNTAX ERROR   ((⎕IO+)⊃X)←'XXX'   ^ ^ $ less DUMP_TEST.apl . X←00     ((⎕IO+)

Fwd: Operator binding

10 10 10 10 10 10 10    but it is  625¨⍴5 10 15 20 25 Just asking ..:-) Best Regards Hans-Peter Am 02.12.20 um 17:27 schrieb Dr. Jürgen Sauermann: Hi, in following up the recent email discussions with Jay Foad and Hans-Peter Sorge, I have changed the operator-to-operator binding in

Re: edif2 corner condition.

mitted and pushed. Chris On 12/2/20 7:24 PM, Hans-Peter Sorge wrote: Hi, sorry for the previous long mail. Here is quite a short solution:-) In edif2.cc replace     // int    inotify_rc = inotify_add_watch(inotify_fd, dir, IN_CREATE | IN_MODIFY ); by     int    inotify_rc = inotify

Re: edif2 corner condition.

problem. Explanation: IN_NOTIFY gets fired if as soon as a file gets created. IN_CLOSE_WRITE as soon as the file content got fully written and the file got closed. So reading the file content is save Best Regard Hans-Peter Am 02.12.20 um 16:27 schrieb Hans-Peter Sorge: Hi Chris, I have done

Re: edif2 corner condition.

ieb Chris Moller: Looks like it might be a concurrency problem--edif2 forks, IIRC, twice, serially, and I never was completely sure that I had the waitpid()s right.  I'll take a look. Chris On 10/30/20 11:22 AM, Hans-Peter Sorge wrote: Hi, working with an external editor under some circumsta

Re: APL2 Compatibility

bound to /** ** AA BB CC *which corresponds to pattern (A O) P B above. This is almost as easy as using parentheses for values. Best Regards, Jürgen On 11/26/20 1:28 PM, Hans-Peter Sorge wrote: Hi, I thought so, APL is fun:-) The following 4 expressions are just a repeat: ⍝1 - a vector

Re: APL2 Compatibility

ples are showing something different, where you're introducing an extra level of nesting to the right argument but without changing its rank or shape. Jay. On Thu, 26 Nov 2020 at 23:56, Hans-Peter Sorge wrote: Hi Jay, .. not quite: (,6)/'a' aa (,6)/,¨&#x

Re: APL2 Compatibility

Hi, I thought so, APL is fun:-) The following 4 expressions are just a repeat: ⍝1 - a vector replicates a scalar. The result is a simple vector 1 2 3/'A' AA ⍝2 - scalar by scalar - simple vector as result   1 2 3/'ABC' ABBCCC ⍝3 - as in ⍝1 but  for each scalar  a vector replicates

Re: edif2 corner condition.

ller: Looks like it might be a concurrency problem--edif2 forks, IIRC, twice, serially, and I never was completely sure that I had the waitpid()s right.  I'll take a look. Chris On 10/30/20 11:22 AM, Hans-Peter Sorge wrote: Hi, working with an external editor under some circumstances some

Re: ⎕FIO Buffer limit is 5000 Bytes

Hello Jürgen, thank your for the insight. Best Regards Hans-Peter Am 03.11.20 um 11:29 schrieb Dr. Jürgen Sauermann: Hi Hans-Peter, see below. Best Regards, Jürgen On 11/2/20 8:02 PM, Hans-Peter Sorge wrote: Hello Jürgen, as far as some UTF study got me I have 2 questions: Two

Re: ⎕FIO Buffer limit is 5000 Bytes

er becomes available at APL level and can be recovered by subtracting 0x10 from the codepoint) rather than raisong an error. *SVN 1352*. Best Regards, Jürgen On 11/2/20 10:05 AM, Hans-Peter Sorge wrote: Hi Jürgen, I agree. A *cat BIN_FILE*  in a terminal session is of artistically value on

Re: ⎕FIO Buffer limit is 5000 Bytes

most cases (and especially for interactive use cases) the current solution is more convenient since the result can be displayed directly (at least for text output). Best Regards, Jürgen On 10/31/20 4:10 PM, Hans-Peter Sorge wrote: EIJHHH - never thought about it - COOOL. ⍝IBM APL: ⍎ &

Re: Another slow each (∨/¨)

Hello Jürgen, amazing, thank you. Best Regards Hans-Peter Am 01.11.20 um 19:59 schrieb Dr. Jürgen Sauermann: Hi Hans-Peter, thanks, fixed in *SVN 1351*. Best Regards, Jürgen On 10/31/20 4:52 PM, Hans-Peter Sorge wrote: Hi, the ∨/¨ on nested logical vectors is running slow.   )WSID

Two workspaces

Hello Jürgen, I have a corrupted workspace and the still working backup. Do you want me to send them to you for analysis? It's just some experimental stuff and related to the previous reports I sent. Best Regards Hans-Peter

Re: For your eyes

Hi Christian, I'm still learning .. errno -l  or errno NNN helps a lot. I had to install the moreutils package. Never before I got across this helpful stuff. Thank you for the eye opener:-) Best Regards Hans-Peter Am 01.11.20 um 07:46 schrieb Christian Robert: For your eyes,    strerr

stack trace on scan each

Hi, ⍝ this is OK:   C10←2⍴⊂'AB12EF12IJ'   C10 AB12EF12IJ AB12EF12IJ   P10←(⊂2/⍳5)⊂¨C10   S10←P10∊¨⊂⊂'12'   S10  0 1 0 1 0  0 1 0 1 0   S10/¨P10   12 12    12 12 ⍝ for a one element nested vector it ends in a stack trace: C10←,⊂'AB12EF12IJ'   P10←(⊂

Another slow each (∨/¨)

Hi, the ∨/¨ on nested logical vectors is running slow.   )WSID IS CLEAR WS ⍝ get the data for testing   ⍴f ←  ⎕FIO[49] '/OTH/APL/trunk/src/Makefile.in' 5246 ⍝ timer     t←⎕FIO[50] 1 ⍝ Finding SQL-records is fast. The ∨/¨ is the slow guy - about 2 min. ⍝ I would expect that " (

Re: ⎕FIO Buffer limit is 5000 Bytes

EIJHHH - never thought about it - COOOL. ⍝IBM APL: ⍎ ')HOST ls' VALUE ERROR   )HOST ls     ^   ⍎')HOST ls' ^ ⍝ GNU-APL: l ← ⍎ ')HOST ls -1' And it works:-)) Makes life much easier. f ← ⍎ ')HOST cat filename' ⍝ returns the file as nested vec

Re: take each question

Hi Jürgen, thank you. Best Regards Hans-Peter Am 30.10.20 um 19:09 schrieb Dr. Jürgen Sauermann: i Hans-Peter, thanks for reporting this. Fixed in *SVN 1350*. Best Regards, Jürgen On 10/30/20 3:22 PM, Hans-Peter Sorge wrote: Hi, ⍝ works as expected   (3) ↑ 'abcd' abc

edif2 corner condition.

Hi, working with an external editor under some circumstances some function content gets destroyed:   )wsid IS CLEAR WS   'libedif2.so' ⎕FX 'edif2' edif2   'emacs' edif2 'FN1'   - adding two lines, save and exit   'emacs' edif2 'FN1'   - body OK   'emacs' edif2 'FN2'   - n

Re: ⎕FIO non Zero Return Code related to ⎕FX

Handle←⎕FIO[24] Command) ◊ ⎕FIO[25] Handle** **sad y asds** ** **768** * The *728* above is the exit code *3* shifted 8 bits. This is only to demonstrate the shift, normally you would use 0 instead of 3. Hope this helps, Jürgen On 10/29/20 9:06 PM, Hans-Peter Sorge wrote: Hi, the Command is b

Re: ⎕FIO Buffer limit is 5000 Bytes

, Oct 29, 2020 at 10:22:52PM +0100, Hans-Peter Sorge wrote: the return size from ⎕FIO[24] / ⎕FIO[6] is limited to 5000B: (...) Should be: What ever it takes :-) It's not limited to 5000B, it's just the default size and you can use any other with dyadic form.  ⎕FIO is fairly low-lev

take each question

Hi, ⍝ works as expected   (3) ↑ 'abcd' abc ⍝ works as expected too   (,3) ↑ 'abcd' abc ⍝ looks like a bug here - IBM APL is OK   (,3) ↑¨ 'abcd'  'wxyz'  '' LENGTH ERROR   (,3)↑¨'abcd' 'wxyz' ''   ^    ^ ⍝ needs to be a scalar   (,/,3) ↑¨ 'abcd'  'wxyz'  ''  

⎕FIO Buffer limit is 5000 Bytes

Hi, the return size from ⎕FIO[24] / ⎕FIO[6] is limited to 5000B:   long←6000⍴'#'   Command←'echo "',long,'"'   Handle←⎕FIO[24] Command   D←⎕FIO[6] Handle   ZN←⎕UCS D   ⍴ZN 5000 Should be: What ever it takes :-) Regards Hans-Peter

⎕FIO non Zero Return Code related to ⎕FX

Hi, the Command is being correctly executed, the return codes are -10   Command←'echo "sad x asds" | sed "s/x/y/g"'   Handle←⎕FIO[24] Command   D←⎕FIO[6] Handle   ZN←⎕UCS D   ZN sad y asds   ⎕FIO[25] Handle ¯10   Command←'sed "s/x/y/g" <<< "sad x asds"'   Handle

gnu apl emacs - Package cl is depricated

Hi, the recent update to emacs 27.1 gave me some headaches. Starting emacs FILE, the warning 'Package cl is depricated' popped up and did not open FILE. To make it short: Emacs started with  path /usr/share/emacs/27.1/site-lisp in mind. Then it did not find a proper file and continued to loo

Re: Could not compile gnu apl-1.8 on Fedora 32

Hi, just to let you know (FC32, most recent version). The dependency shows dnf deplist apl-1.8-0.x86_64.rpm .   dependency: libstdc++.so.6(GLIBCXX_3.4.9)(64bit)    provider: libstdc++-10.2.1-1.fc32.x86_64   dependency: libtinfo.so.5()(64bit)    provider: ncurses-compat-libs-6.1-15.20191109.f

Re: Potential problem in diadic iota (⍳) or in Pick (⊃)

This is some intermittent bug.. with less than 255 elements the all elements are always equal   t←? 255 ⍴ i   +/t = 2÷⍨ {⍵×2} fasteach t 255   t←? 512 ⍴ i   +/t = 2÷⍨ {⍵×2} fasteach t 50   t←? 300 ⍴ i   +/t = 2÷⍨ {⍵×2} fasteach t 9   256 elements  random number of ele

Re: Potential problem in diadic iota (⍳) or in Pick (⊃)

Hi, this boils down to: i←63   t←? 1000 ⍴ i   t = 2÷⍨ {⍵×2} fasteach t 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1

Re: exercise 2019/03

   B 0   0.0   B 0   0.0  C 3  20.0   C 1  20.0   C 0   0.0   C 0   0.0   C 0   0.0  D 2  13.3   D 1  20.0   D 0   0.0   D 0   0.0   D 0   0.0  F 1   6.7   F 1  20.0   F 0   0.0   F 0   0.0   F 0   0.0 Regards Hans-Peter Am 17.04.20 um 22:29 schrieb Hans-Peter Sorge: Hi, this case should be all z

Re: Division by 0

10:26:09PM +0200, Hans-Peter Sorge wrote: Hi, I just noted some inconsistencies:   0÷0 1   0.1÷0 DOMAIN ERROR   0.1÷0   ^  ^   0.1÷0 1 DOMAIN ERROR   0.1÷0 1   ^  ^   0÷0 1 1 0   1 0 ÷ 0 DOMAIN ERROR   1 0÷0   ^  ^   0 0 ÷ 0 1 1   

Re: exercise 2019/03

Hi, this case should be all zeros:   gradeDistri 'G' A 0 100 B 0 100 C 0 100 D 0 100 F 0 100 looks ok:   gradeDistri 'AG' A 1 100 B 0   0 C 0   0 D 0   0 F 0   0 Regards Hans-Peter Am 17.04.20 um 17:29 schrieb Otto Diesenbacher-Reinmüller: Hi APLers, first, many thanks to Mohammad, K

Division by 0

Hi, I just noted some inconsistencies:   0÷0 1   0.1÷0 DOMAIN ERROR   0.1÷0   ^  ^   0.1÷0 1 DOMAIN ERROR   0.1÷0 1   ^  ^   0÷0 1 1 0   1 0 ÷ 0 DOMAIN ERROR   1 0÷0   ^  ^   0 0 ÷ 0 1 1   0 ÷ 0 0 1 1   1 ÷ 0 0 DOMAIN ERROR   1÷0

Re: exercise 2019/02

Hi, how about   ∇find_grade[⎕]∇     ∇ [0]   r←find_grade g;gm;gl [1]   gm←0 65 70 80 90 [2]   gl←'FDCBA' [3]   r←,¨gl[+/[1]gm ∘.≤ g]     ∇   m,find_grade m←5 2⍴0 64  65 69  70 79  80 89  90 100   0  64 F F  65  69 D D  70  79 C C  80  89 B B  90 100 A A Regards Hans-Peter Am 14.04.2

Re: Index-of function with structured left-argument

Hi, Your ⎕IO is 0 ⎕IO←1   Display (2 2 ⍴ 104 105 106 107) ⍳ (3 4 ⍴ 100+⍳100) ┏→━━┓ ↓┏⊖┓   ┏⊖┓   ┏⊖┓   ┏→━━┓┃ ┃┃0┃   ┃0┃   ┃0┃   ┃1 1┃┃ ┃┗━┛   ┗━┛   ┗━┛   ┗━━━┛┃ ┃┏→━━┓ ┏→━━┓ ┏→━━┓ ┏⊖┓  ┃ ┃┃1 2┃ ┃2 1┃ ┃2 2┃ ┃0┃  ┃ ┃┗━━━┛ ┗━━━┛ ┗━━━┛ ┗━┛  ┃ ┃┏⊖┓   ┏⊖┓   ┏⊖┓   ┏⊖┓  ┃ ┃┃0┃  

Re: Function editing and line editing have inconsistencies.

entry line 456 cursor up - display entry line 123 cursor down - display entry line 456 cursor down - display current entry line which looks OK to me. Best Regards, Jürgen On 3/12/20 3:40 PM, Hans-Peter Sorge wrote: Hi, There are two inconsistencies (and slightly annoying) when editing: 1 - is a

Re: Fwd: Re: Function editing and line editing have inconsistencies.

d fantastic mode for GNU APL: https://github.com/lokedhs/gnu-apl-mode It makes working with GNU APL a pleasure and removes the necessity of the full screen editing. Br, /Alexey Hans-Peter Sorge mailto:hanspeterso...@netscape.net>> writes: > Weite

  1   2   >