Oops... typo.. the obverse of ungamma should have been gamma.
Sorry about that.
--
Raul
On Tue, Jul 10, 2012 at 1:01 PM, Raul Miller <rauldmil...@gmail.com> wrote:
> Emphasis.
>
> --
> Raul
>
> On Tue, Jul 10, 2012 at 12:56 PM, Brian Schott <schott.br...@gmail.com> wrote:
>> Why is the obverse of gamma, ungamma, and obversely?
>>
>> On Tue, Jul 10, 2012 at 11:16 AM, Raul Miller <rauldmil...@gmail.com> wrote:
>>> Here's an implementation:
>>>
>>> gamma=: ([: ; <@(#&1@#, 0:, ])@}.@#:"0) :. gamma
>>>
>>> ungamma=:3 :0 :. ungamma
>>> r=. i. 0
>>> while. #y do.
>>> len=. y i. 0
>>> r=. r, #. 1, len {. (1+len) }. y
>>> y=. (1+2*len) }. y
>>> end.
>>> r
>>> )
>>>
>> --
>> (B=)
>> ----------------------------------------------------------------------
>> For information about J forums see http://www.jsoftware.com/forums.htm
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
