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
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
,
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] '
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
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
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
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
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
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
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,
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←
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
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 .
-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
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
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
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
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
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
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
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
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
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:
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
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
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
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
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
⍝
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
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
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
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
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
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
Hi,
Revision 1797 fails with
Quad_MX.cc: In member function 'virtual sAxis
Quad_MX::subfun_to_axis(const UCS_string&) const':
Quad_MX.cc:1306:27: error: invalid application of 'sizeof' to incomplete
type 'Quad_MX::fun_info []'
1306 | FUN_INFO_COUNT = sizeof(op_desc) / FUN_INFO_SIZE
Sorry - I get some horrible big letters in my original post.
High-res and font settings and manual adjust and Wayland seen not
to go along very well :-(
Am 09.12.24 um 22:22 schrieb Hans-Peter Sorge:
Hi,
Revision 1797 fails with
Quad_MX.cc: In member function 'virtual sAxis
Qu
Hi,
A simple path to reproduce the reported ")Copy bug" :
)clear
CLEAR WS
)copy Editor
SAVED 2025-02-10 09:15:01 (GMT-6)
E∆Edit 'E∆Edit'
At all prompts you can type 'end' to exit or backup to the previous
question.
You can often type 'help' to get help.
Enter your edit comman
Sorry -
an even shorter way .
)clear
CLEAR WS
→(0=⍴,0)/0
SYNTAX ERROR+
→(0=⍴0)/0
^
Best Regards
Hans-Peter
Am 10.02.25 um 16:41 schrieb Hans-Peter Sorge:
Hi,
A simple path to reproduce the reported ")Copy bug" :
)clear
CLEAR WS
)copy Editor
SAVED
Hi Jürgen.
the bug persists.
Best Regards
Hans-Peter
Am 10.12.24 um 13:02 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter, Bill,
as far as I can see the Apple error is bogus. However, I believe I found
a solution in *SVN 1798*.
Best Regards,
Jürgen
On 12/9/24 22:31, Hans-Peter Sorge wrote
e I
found
a solution in *SVN 1798*.
Best Regards,
Jürgen
On 12/9/24 22:31, Hans-Peter Sorge wrote:
Sorry - I get some horrible big letters in my original post.
High-res and font settings and manual adjust and Wayland seen not
to go along very well :-(
Am 09.12.24 um 22:22 schrieb Han
WS to compare both cases?
Just ideas popping up.
Best Regard
Hans-Peter
Am 12.02.25 um 20:25 schrieb Blake McBride:
Just FYI. The problems I was noticing were unrelated to )COPY
I saw the same problems with )LOAD
--blake
On Wed, Feb 12, 2025 at 1:05 PM Hans-Peter Sorge
wrote:
Hi J
Hi,
)clear
CLEAR WS
⎕CR ' '
==
Assertion failed: size()
in Function: back
in file: UCS_string.hh:322
C/C++ call stack:
-- Stack trace at Assert.cc:75
--
Hi Jürgen,
in SVN: 1833:1838M fixed too.
Thank you and Best Regards
Hans-Peter
Am 14.02.25 um 17:20 schrieb Hans-Peter Sorge:
Hi,
$ apl -q
set the stop vector for long running / large data volume functions
when a particular situation is met.
Here grossly simplified ...
∇x
[1] ⍎1/
Hi,
$ apl -q
/⍝ create, rather simple, content/
* BUG←⊂⊂¨(1 2 0)⍴¨'X'
*/⍝ dump content/***
)dump buggy
*2025-02-16 12:13:47 (GMT+1)
/⍝ and copy dumped content/**
*)copy buggy*
DUMPED 2025-02-16 12:13:47 (GMT+1)
/⍝ /() /related to ⊂ (enclose)?/
DOMAIN ERROR
((⎕IO+() 0 ())⊃BUG)←'X
gen
On 2/14/25 14:55, Hans-Peter Sorge wrote:
Hi,
)clear
CLEAR WS
⎕CR ' '
==
Assertion failed: size()
in Function: back
in file: UCS_string.hh:322
C/C++ call stack:
-
:49 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, hopefully fixed in *SVN 1860*.
Not sure, though, if I have understood all issues reported.
Best Reards,
Jürgen
On 3/16/25 20:49, Hans-Peter Sorge wrote:
Hi,
for the following nested vector the Selective Assigments do not work
properly
Hi,
for the following nested vector the Selective Assigments do not work
properly:
/
⍝ Matrix A is being repeated 3 times in B.
⍝ Matrix A has a skalar and an empty vector.
⍝ Those items have to be replaced.
/* A←2 2⍴ 'A' 'abc' (2 2⍴'qwert') ' '
B←3⍴⊂A
8 ⎕CR B*
┌→─
mmand.cc:136
#15 0x005f841din
Workspace::immediate_execution(exit_on_error=false) at Workspace.cc:260
#16 0x00403182in main(argc=1, argv=0x7fffe118) at main.cc:641
(gdb)
On 2025-04-25 12:52, Hans-Peter Sorge wrote:
Hi Jürgen
I reverted /usr/include/c++/15/bits/stl_vector
Jürgen is actually working on this problem.
may take some time because it affect std::vector<> class and there are
a lot of them in gnu apl.
On fedora 42, the new library check for *all* out of bound access and
there are some in the gnu apl code.
Xtian.
On 2025-04-23 09:23, Hans-Pete
mand.cc:174
#14 0x00461661in Command::process_line() at Command.cc:136
#15 0x005f841din
Workspace::immediate_execution(exit_on_error=false) at Workspace.cc:260
#16 0x00403182in main(argc=1, argv=0x7fffe118) at main.cc:641
(gdb)
On 2025-04-25 12:52, Hans-Peter Sorg
Hi,
this is with most recent SVN:
⎕AV ⍳ 'a'
/usr/include/c++/15/bits/stl_vector.h:1263: std::vector<_Tp,
_Alloc>::reference std::vector<_Tp, _Alloc>::operator[](size_type) [with
_Tp = Token; _Alloc = std::allocator; reference = Token&;
size_type = long unsigned int]: Assertion '__n < thi
, I fixed something that may or may not solve the issue. *SVN
1863*.
Please let me know if it helped.
Best Regards,
Jürgen
On 4/23/25 15:23, Hans-Peter Sorge wrote:
Hi,
this is with most recent SVN:
⎕AV ⍳ 'a'
/usr/include/c++/15/bits/stl_vector.h:1263: std::vector<
me believe that your interpreter was built during that period.
Best Regards,
Jürgen
On 4/13/25 22:34, Hans-Peter Sorge via Bugs and suggestions for GNU
APL wrote:
Hi,
The Stack Trace is persistent if I try to )SAVE.
)DUMP, )LOAD, )SAVE does not reproduce the trace.
All Variables were )ERASEd
gards,
Jürgem
On 2/18/25 17:01, Hans-Peter Sorge wrote:
Hi,
in SVN: 1833:1841M there is a stack trace for
*x←, ⊂1 1 0 0 1 1**
y←,⊂'asdfgh'
x[1]/¨y[1]*
*** useless apl.lines (no CXXFLAGS=-rdynamic -gdwarf-2)
-- Stack trace at
*)clear*
CLEAR WS
* (⊂¨(1 0 1 0 0 1) (1 1 1)) ⊂¨ ⊂¨(1 0 1 0 0 1) (1 1 1) *
RANK ERROR
(⊂¨(1 0 1 0 0 1) (1 1 1))⊂¨⊂¨(1 0 1 0 0 1) (1 1 1)
^ ^
*/⍝ just the ~/*
*(~⊂¨(1 0 1 0 0 1) (1 1 1)) ⊂¨ ⊂¨(1 0 1 0 0 1) (1 1 1)*
Hi,
in SVN: 1833:1841M there is a stack trace for
*x←, ⊂1 1 0 0 1 1**
y←,⊂'asdfgh'
x[1]/¨y[1]*
*** useless apl.lines (no CXXFLAGS=-rdynamic -gdwarf-2)
-- Stack trace at Prefix.cc:1504
0x7f6
The most likely suspect in my
experience is the pick (monadic ⊃) function.
Best Regards,
Jürgen
On 2/24/25 00:19, Hans-Peter Sorge wrote:
Hi,
The expressions for "a" and "b" yield the proper results:
*a← (⊂¨ 2 2 ⍴⊂,¨2 2 ⍴⍬ )**
b← (⊃¨⊂¨ 2 2 ⍴⊂,¨2 2 ⍴⍬ ) **/⍝⊃¨a/*
/⍝ The d
g.
Best Regards
Hans-Peter
Am 01.03.25 um 23:21 schrieb Hans-Peter Sorge:
Hi,
I would like eliminate some content from the )Saved WS file to locate
the offending content,
as it still takes a couple of minutes to )LOAD the )DUMPed WS.
How can I relate the trace to the xml? Thoughts furth
Hi,
I would like eliminate some content from the )Saved WS file to locate
the offending content,
as it still takes a couple of minutes to )LOAD the )DUMPed WS.
How can I relate the trace to the xml? Thoughts further down.
]log 24
Logging facility 24: commands )LOAD, )SAVE, )IN, and )O
*vid* that is
currently being processed.
Best Regards,
Jürgen
On 3/1/25 23:21, Hans-Peter Sorge wrote:
Hi,
I would like eliminate some content from the )Saved WS file to locate
the offending content,
as it still takes a couple of minutes to )LOAD the )DUMPed WS.
How can I relate the trace
:
Hi Hans-Peter,
thanks. See *SVN 1853* for a faster version. Frequent expands of a
big matrix was apparently not such a good idea.
Best Regards,
Jürgen
On 3/6/25 00:56, Hans-Peter Sorge wrote:
Hi Jürgen,
I tested
*big←10?10*
)save WS / )load WS.xml happens in almost no time.
)dump
newer version
will not be supported.
SAVED 2025-03-04 15:53:01 (GMT+1)*
Don't worry about the version mismatch - I step up the Archive version
whenever
the file format changes in some way (like it did with yesterday's fix).
Best Regards,
Jürgen
On 3/4/25 16:06, Hans-Peter Sorge vi
, say *vid=yyy* and *yyy > xxx*. With the fix the ravels are
being ordered by increasing depth (which enforces *yyy < xxx*).
Best Regards,
Jürgen
On 3/7/25 12:12, Hans-Peter Sorge via Bugs and suggestions for GNU APL
wrote:
Hello Jürgen,
bug hunting turns funny, when you realize, the bu
Hi,
creating a slightly odd matrix:
*mtx←(2 2)⍴ 'asdsf' ('a',(⊂,⍬ ),'s',⊂,⍬ ) (4⍴⊂,⍬ ) (⍬ )**
8 ⎕CR mtx*
Character '⊖' replaced ~ for readability.
This output is expected.
┌→──┐
↓┌→┐ ┌→──┐│
││asdsf│ │a ┌~┐ s ┌~┐││
│└─┘
n such
that it will not harm
real life APL code. However, almost every system limit can be exceeded
by constructing
an example that aims at exceeding it. I do not consider that as a
design fault.
Best Regards,
Jürgen
On 3/1/25 20:40, Hans-Peter Sorge wrote:
Hi Jürgen,
* 3 ⎕CR ⍎∊17⍴⊂'
)COPY time should be correct.
Best Regards,
Jürgen
On 2/26/25 20:24, Hans-Peter Sorge wrote:
Hi,
The Diamond operator is not always working as advertised.
Several statements on the same line are separated by the APL
character ◊ (called /Diamond/).
Note that different statements on the same li
use )SAVE / )LOAD now?
Best Regards
Hans-Peter
Am 26.02.25 um 15:48 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1843*.
Best Regards,
Jürgen
I have made a major re-disign of 10 ⎕CR B, hope it does
not brake other
On 2/16/25 12:35, Hans-Peter Sorge wrote:
Hi,
$ apl
lines are being inserted.
Best Regards,
Jürgen
On 2/17/25 10:46, Hans-Peter Sorge wrote:
Hi,
The output from x is nicely arranged:
/⍝ A 2x2 array of 2x2 arrays/ :
*x←2 2 ⍴(⊂2 2)⍴¨ 'asdf' 'yxcv' 'hjkl' 'uiop'**
x
***as yx
df cv
hj ui
kl op
* ≡
1
Z←rho_Z⍴Z
∇*
The macro is called with LO=ENCL or LO=DISCL and B.
My conclusion so far (and I am running out of ideas) is this:
Either there is no fault, or the fault is in both the macro and in the
C/C++
implementation of the EACH operator. The most likely suspect in my
experience is the pick
, Hans-Peter Sorge wrote:
Hi Jürgen,
thank you.
Loading a )DUMPed WS.apl brings the variable back - thank you.
Now.
Loading a )DUMPed WS.apl with a 1⍴' ' variable in it takes about
11[sec] to restore the Var!!
>> ~ 2⍴' ' is blowing the )TIME LIMIT.
A couple
Hi,
The output from x is nicely arranged:
/⍝ A 2x2 array of 2x2 arrays/ :
*x←2 2 ⍴(⊂2 2)⍴¨ 'asdf' 'yxcv' 'hjkl' 'uiop'**
x
***as yx
df cv
hj ui
kl op
* ≡x*
2
/⍝ The gaps between arrays: OK.
/*⍕x*
as yx
df cv
hj ui
kl op /
⍝ Correct gaps:/
* ' '=⍕x*
1 0 0 1 1 0 0 1
1 0 0 1
Hi,
$ apl -q
set the stop vector for long running / large data volume functions
when a particular situation is met.
Here grossly simplified ...
∇x
[1] ⍎1/'S∆x←stopper'
[2] stopper:
[3] S∆x←⍳0∇
x
x[2]
→2
Symbol is: 'stopper' at Symbol.cc:404
*** useless apl.lines (no CXXFLAGS=-rd
Hi,
The expressions for "a" and "b" yield the proper results:
* a← (⊂¨ 2 2 ⍴⊂,¨2 2 ⍴⍬ )**
b← (⊃¨⊂¨ 2 2 ⍴⊂,¨2 2 ⍴⍬ ) **/⍝⊃¨a/*
/⍝ The disclose in "b" works as expected/
*'ab',¨ ⊂¨ 3 ⎕CR ¨ a b /⍝ expression to represent "a" and "b" in one
line. /*
a ┏━┓ ┏━┓ b ┏→
AD now?
Best Regards
Hans-Peter
Am 26.02.25 um 15:48 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1843*.
Best Regards,
Jürgen
I have made a major re-disign of 10 ⎕CR B, hope it does
not brake other
On 2/16/25 12:35, Hans-Peter Sorge wrote:
Hi,
$ apl -q
/⍝ create, rather
Hi,
The Diamond operator is not always working as advertised.
Several statements on the same line are separated by the APL character ◊
(called /Diamond/).
Note that different statements on the same line are executed from left
to right while each statement is evaluated from right to left.
a
Hello Jürgen,
thanks a lot.
Best Regards
Hans-Peter
Am 26.02.25 um 18:42 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1844*.
Best Regards,
Jürgen
On 2/18/25 21:14, Hans-Peter Sorge wrote:
*)clear*
CLEAR WS
* (⊂¨(1 0 1 0 0 1) (1 1 1)) ⊂¨ ⊂¨(1 0 1 0 0 1) (1 1 1
Hi,
various operators (+,-,⌊,) stack trace on *(⊂1 1)+¨0/1 *
(it's ¨ (each) again)
/⍝ Expected/
* ⍴(⊂1 1)+0/1*
0
*+(⊂1 1)+0/1*
/⍝ Left operator stack traces (as does power too //*((⊂1 1)+¨0/1)*1 )*/
*⍴(⊂1 1)+¨0/1*
0
* + (⊂1 1)+¨0/1*
=
Hi Jürgen,
a big thank you. Works like a charm.
Best Regards,
Hans-Peter
Am 22.05.25 um 15:59 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1873*.
Best Regards,
Juergen
On 5/21/25 23:37, Hans-Peter Sorge wrote:
Hi Jürgen,
the stack trace is gone.
however:
/⍝ The
) (3 4)*
DOMAIN ERROR
+/¨0 0/(1 2) (3 4)
^ ^
Best Regards
Hans-Peter
Am 21.05.25 um 16:44 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1872*.
Best Regards,
Jürgen
On 5/20/25 11:39, Hans-Peter Sorge wrote:
Hi,
various operators (+,-,⌊,) stack trace on *(⊂1
Hi Jürgen,
looks good.
Thank you.
Best Regards
Hans-Peter
Am 03.07.25 um 14:42 schrieb Dr. Jürgen Sauermann:
Hi Hans-Peter,
thanks, fixed in *SVN 1879*.
Best Regards,
Jürgen
On 7/2/25 16:17, Hans-Peter Sorge wrote:
Hi Jürgen,
thank you for the extension and the work you put into it.
It
e 2 stands for directory /home/eedjsa/apl-1.9/src/wslib2
That directory is missing or not accessible.
See command )LIBS without arguments for details.*
*SVN 1878*.
Best Regards.
Jürgen
On 7/1/25 15:45, Hans-Peter Sorge wrote:
Hi Jürgen,
correct.
However as there is no simple command that retur
** *(which most likely
does not exist since the shell expands *** to all files).
Best Regards,
Jürgen
On 6/30/25 16:57, Hans-Peter Sorge wrote:
Hi
in the past *)LIBS 0 **
did return the set Library Path.
With SVN: 1876:1877M
I get
*)libs 0 ***
*LIBRARY REFERENCE 0 SET TO *
* )lib 0**
Hi
in the past *)LIBS 0 **
did return the set Library Path.
With SVN: 1876:1877M
I get
*)libs 0 ***
*LIBRARY REFERENCE 0 SET TO *
* )lib 0***
IMPROPER LIBRARY REFERENCE '0': No such file or directory
Currently there is no (documented?) simple way to retrieve the lib-name.
Best Regards
H
Hi,
The Stack Trace is persistent if I try to )SAVE.
)DUMP, )LOAD, )SAVE does not reproduce the trace.
All Variables were )ERASEd
* )FNS*
ANALYSE_READINGS_UPDATE ANALYSE_REDINGS_UPDATE BYTES DTSs
EDIT H2D H2I H2N H2T ISK LO PROCESS RA
RAl RAr RE
Hi,
I can )LOAD the attached WS.
However a )copy goes into nirwana ...
Latest most recent SVN as of now..
* )copy BUGGY_CLOSE mtx**
*
===
SEGMENTATION FAULT
*** useless apl.lines (no CXXFLAGS=-rdynamic -gdwarf-2)
--
101 - 185 of 185 matches
Mail list logo