I am posting the requested definitions below. It is clear that aatrain is
wrong.
It is also clear that in one of your postings daFx is mangled and that may
have contributed to the problem. But I suspect that the order of entering
the definitions is tricky and perhaps you could post them all at once.
Ug
2 : 'a =. (m { n) if. 1 =#a do. a 5!:0 end.'
MA1
1 : 0
'`ff' =. {: m
f =. 1 : ('U =. Ug m'; ff )
(}: m) f
)
F
(2 : 0)(3 2$'(''m `:6'')';0;'tieD tieD';1;'tieD MA1';1)
if. 0 -.@-: 1{:: a =. v ncA do. n =. ,: a end.
if. 1 = 1 {:: (;: inv {."1 a =.(u ncA , n)) ncA do. a aatrain else.
(;: inv {."1 a) eval end.
)
aatrain
1 : 'u 1 :''2 : (105 102 46 32 48 32 45 46 64 45 58 32 49 123 58 58 32 97
32 61 46 32 118 32 110 99 65 32 100 111 46 32 110 32 61 46 32 44 58 32 97
32 101 110 100 46 10 105 102 46 32 32 49 32 61 32 49 32 123 58 58 32 40 59
58 32 105 110 118 32 123 46 34 4...
aatrain =: 0 daFx
if. 0 -.@-: 1{:: a =. v ncA do. n =. ,: a end.
if. 1 = 1 {:: (;: inv {."1 a =.(u ncA , n)) ncA do. a aatrain else.
(;: inv {."1 a) eval end.
)
+/ (% +:@# F) NB. parens just to show contained adverb.
|domain error: MA1
| f=. 1 :('U =. Ug m';ff)
+/ % # F NB. parenthesless
|domain error: MA1
| f=. 1 :('U =. Ug m';ff)
On Sat, Jul 30, 2016 at 2:02 PM, 'Pascal Jasmin' via Programming <
[email protected]> wrote:
> don't know what it could be,
>
> post definitions you have for
>
> Ug
> MA1
>
> F
>
> aatrain
>
>
>
>
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
