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 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 calculations (25 all together for the kids to guess which one is close to the results given. )
[4]   M←L∘.,R   ⍝ for display
[5]   V←92288 76246 90072 102027 51254 34017  ⍝  Six result "proposals"
[6]   X←E ∊¨⊂ V    ⍝ We do no guessing. See what really fits.  0 - no,   1 - yes
[7]  ⍝ buggy code to come:
[8]   (' - ' '(X)'[1+ X]),¨ ((⊂5 0)⍕¨M) ,¨ (⊂9 0)⍕¨E  ⍝  Make it looking nice -
    ∇
      Mathe_Bug
RANK ERROR
Mathe_Bug[8]  X←Eϵ¨⊂V
              ^
The error in line 8 is (' - ' '(X)'[1+ X])
missing a pair of "()": ((' - ' '(X)')[1+ X])
However the expression from line [6] gets displayed.

Best Regards
Hans-Peter


Reply via email to