It may have lots of caps when you display it. I don't think 13 : allows caps in
the definition..
Linda
Sent from my Verizon, Samsung Galaxy smartphone
-------- Original message --------
From: Raul Miller <rauldmil...@gmail.com>
Date: 10/16/18 1:28 PM (GMT-05:00)
To: Programming forum <programm...@jsoftware.com>
Subject: Re: [Jprogramming] Using rank to avoid looping - reference?
I'm not quite sure what you have said here (which, sadly for me, is
not that all that uncommon of an experience).
Are you saying that you want an explicit definition for h (without any
use of [:) such that 13 : gives a tacit definition?
Thanks,
--
Raul
On Tue, Oct 16, 2018 at 1:16 PM Linda Alvord <lindaalvor...@outlook.com> wrote:
>
> Both work and are interesting. However I'm a fan of:
>
> Dealr=: 13 :' '
>
> Which will provide a tacit definition. However, maybe it isn't possible.
>
> Linda
>
>
> -----Original Message-----
> From: Programming <programming-boun...@forums.jsoftware.com> On Behalf Of
> Raul Miller
> Sent: Tuesday, October 16, 2018 10:53 AM
> To: Programming forum <programm...@jsoftware.com>
> Subject: Re: [Jprogramming] Using rank to avoid looping - reference?
>
> On Tue, Oct 16, 2018 at 4:46 AM Linda Alvord <lindaalvor...@outlook.com>
> wrote:
> > ...
> > Now all that is left to do is Write Dave's "h" as an explicit verb!
>
> That's easy!
>
> h=:4 :0
> x ([: <"2 ({~ ([: \:"1~ |. $ [: ?.~ */))~) y
> )
>
> But you might have meant something more like:
>
>
> suits=: u: 9827 9830 9829 9824
> faces=: '23456789TJQKA'
> deck=: >,{suits;faces
>
> h=:4 :0
> deal=. \:"1~ (|.x) $ ?.~ */x
> <"2 deal { y
> )
>
> Thanks,
>
> --
> Raul
> ----------------------------------------------------------------------
> For information about J forums see
> https://eur04.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&data=02%7C01%7C%7C5cd4c91fde564d7cff0508d6338ccb96%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636753077130474539&sdata=FjUsZsBEhIL378lLmB7ZoWFUTfa%2BExXe2T1BcmlcQtA%3D&reserved=0
> ----------------------------------------------------------------------
> For information about J forums see
> https://eur04.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&data=02%7C01%7C%7C5cd4c91fde564d7cff0508d6338ccb96%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636753077130474539&sdata=FjUsZsBEhIL378lLmB7ZoWFUTfa%2BExXe2T1BcmlcQtA%3D&reserved=0
----------------------------------------------------------------------
For information about J forums see
https://eur04.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.jsoftware.com%2Fforums.htm&data=02%7C01%7C%7C5cd4c91fde564d7cff0508d6338ccb96%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C636753077130474539&sdata=FjUsZsBEhIL378lLmB7ZoWFUTfa%2BExXe2T1BcmlcQtA%3D&reserved=0
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
