>From the dictionary page for E.
http://www.jsoftware.com/help/dictionary/decapdot.htm

   s #~ -. '**' E. s=: 'Remove***multiple**stars.'
Remove*multiple*stars.



----- Original Message -----
From: Roger Hui <[EMAIL PROTECTED]>
Date: Sunday, June 24, 2007 8:19 pm
Subject: Re: [Jprogramming] removing duplications

> nodup1=: (,[EMAIL PROTECTED] [EMAIL PROTECTED] ]) # ]
> 
> 
> 
> ----- Original Message -----
> From: June Kim <[EMAIL PROTECTED]>
> Date: Sunday, June 24, 2007 8:14 pm
> Subject: [Jprogramming] removing duplications
> 
> > nodup is a verb which contracts series of occurences of x in y; it
> > removes duplication.
> > 
> >   t=: 0 : 0
> > abc
> > 
> > 
> > def
> > jkl
> > 
> > )
> > 
> >   nodup=:] #~ 1, 2 *: /\ [=]
> >   LF nodup t
> > abc
> > def
> > jkl
> > 
> >   '!' nodup 'foo!!!bar!!!!foo  bar!'
> > foo!bar!foo  bar!
> > 
> > I feel like there should be an easier way to do this.
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to