Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.lang.forth > #46242

Re: 4th.CoSy : Is your head small enough ?

From "WJ" <w_a_x_man@yahoo.com>
Newsgroups comp.lang.forth
Subject Re: 4th.CoSy : Is your head small enough ?
Date 2016-03-28 04:54 +0000
Organization A noiseless patient Spider
Message-ID <ndader$fba$1@dont-email.me> (permalink)
References <396c683d-9c79-4845-a6c4-a3fade0c411c@googlegroups.com> <ndacrr$e4u$1@dont-email.me>

Show all headers | View raw

WJ wrote:

> Bob Armstrong wrote:
> 
> > I'd just like to let everybody know that I feel
> > 4th.CoSy , http://www.cosy.com/CoSy/ , is past the
> > bushwhacking stage and provides a solid foundation
> > for APL level vocabulary on reference counted
> > lists of lists  in an open x86 FORTH . I gave a
> > demo last Forth Day at Stanford ,
> > https://youtu.be/0u2_jKfo0A8?t=2h48m30s .
> > 
> > If minimal but everyday practical attracts you , check out my
> > 
> >  "Seeking Alphas" , http://cosy.com/y16/CoSy201601.html
> 
> That page shows:
> 
> 
> >   s"  CoSy NEEDS MORE HEADS" >t0> rho  ( |>| 22 | ) 
> >   t0 i( 7 23 )i take >t0>
> >   t0 dup ' reverse 'm ' cL each 
> >   R0 dup reverse cL
> > ( 
> >  s"  CoSy NEEDS MORE HEADS  SDAEH EROM SDEEN ySoC " 
> >  s" CoSy NEEDS MORE HEADS CC SDAEH EROM SDEEN ySoC" 
> >  s" oSy NEEDS MORE HEADS CooC SDAEH EROM SDEEN ySo" 
> >  s" Sy NEEDS MORE HEADS CoSSoC SDAEH EROM SDEEN yS" 
> >  s" y NEEDS MORE HEADS CoSyySoC SDAEH EROM SDEEN y" 
> >  s"  NEEDS MORE HEADS CoSy  ySoC SDAEH EROM SDEEN " 
> >  s" NEEDS MORE HEADS CoSy NN ySoC SDAEH EROM SDEEN" 
> >  s" NEEDS MORE HEADS CoSy NN ySoC SDAEH EROM SDEEN" 
> >  s"  NEEDS MORE HEADS CoSy  ySoC SDAEH EROM SDEEN " 
> >  s" y NEEDS MORE HEADS CoSyySoC SDAEH EROM SDEEN y" 
> >  s" Sy NEEDS MORE HEADS CoSSoC SDAEH EROM SDEEN yS" 
> >  s" oSy NEEDS MORE HEADS CooC SDAEH EROM SDEEN ySo" 
> >  s" CoSy NEEDS MORE HEADS CC SDAEH EROM SDEEN ySoC" 
> >  s"  CoSy NEEDS MORE HEADS  SDAEH EROM SDEEN ySoC " 
> >  )
> 
> That looked like an interesting challenge, so I
> tried it in Ruby.
> 
> mirror=->(x){x+x.reverse}
> s=" RUBY IS FUN ";puts mirror[(0..6).to_a].map{|i|
>   mirror[s.chars.rotate i].join}
> 
>  RUBY IS FUN  NUF SI YBUR
> RUBY IS FUN    NUF SI YBUR
> UBY IS FUN  RR  NUF SI YBU
> BY IS FUN  RUUR  NUF SI YB
> Y IS FUN  RUBBUR  NUF SI Y
>  IS FUN  RUBYYBUR  NUF SI
> IS FUN  RUBY  YBUR  NUF SI
> IS FUN  RUBY  YBUR  NUF SI
>  IS FUN  RUBYYBUR  NUF SI
> Y IS FUN  RUBBUR  NUF SI Y
> BY IS FUN  RUUR  NUF SI YB
> UBY IS FUN  RR  NUF SI YBU
> RUBY IS FUN    NUF SI YBUR
>  RUBY IS FUN  NUF SI YBUR

Shorter:

mirror=->(x){x+x.reverse}
puts mirror[(0..6).to_a].map{|i| mirror[" RUBY IS FUN ".chars.rotate i].join}

Back to comp.lang.forth | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-27 14:30 -0700
  Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-03-27 15:03 -0700
    Re: 4th.CoSy : Is your head small enough ? "WJ" <w_a_x_man@yahoo.com> - 2016-03-28 04:20 +0000
    Re: 4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-28 12:50 -0700
      Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-03-28 13:53 -0700
        Re: 4th.CoSy : Is your head small enough ? foxaudioresearch@gmail.com - 2016-03-28 18:32 -0700
          Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-03-28 21:40 -0700
          Re: 4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-29 10:47 -0700
    Re: 4th.CoSy : Is your head small enough ? "Ala'a" <amalawi@gmail.com> - 2016-03-28 14:00 -0700
      Re: 4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-29 09:47 -0700
  Re: 4th.CoSy : Is your head small enough ? "WJ" <w_a_x_man@yahoo.com> - 2016-03-28 04:44 +0000
    Re: 4th.CoSy : Is your head small enough ? "WJ" <w_a_x_man@yahoo.com> - 2016-03-28 04:54 +0000
      Re: 4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-28 14:03 -0700
        Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-03-28 14:46 -0700
          Re: 4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-29 10:34 -0700
        Re: 4th.CoSy : Is your head small enough ? Ron Aaron <rambamist@gmail.com> - 2016-03-30 18:18 +0300
      Re: 4th.CoSy : Is your head small enough ? "WJ" <w_a_x_man@yahoo.com> - 2016-03-28 21:37 +0000
    Re: 4th.CoSy : Is your head small enough ? "WJ" <w_a_x_man@yahoo.com> - 2016-03-30 09:44 +0000
  Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-03-28 11:34 -0700
    Re: 4th.CoSy : Is your head small enough ? Bob Armstrong <bob@cosy.com> - 2016-03-28 13:48 -0700
    Re: 4th.CoSy : Is your head small enough ? Ron Aaron <rambamist@gmail.com> - 2016-03-29 06:56 +0300
      Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-03-28 21:53 -0700
        Re: 4th.CoSy : Is your head small enough ? Ron Aaron <rambamist@gmail.com> - 2016-03-29 08:27 +0300
          Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-04-02 00:25 -0700
            Re: 4th.CoSy : Is your head small enough ? Ron Aaron <rambamist@gmail.com> - 2016-04-03 06:54 +0300
              Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-04-02 21:59 -0700
                Re: 4th.CoSy : Is your head small enough ? Ron Aaron <rambamist@gmail.com> - 2016-04-03 12:25 +0300
                Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-04-04 01:51 -0700
                Hugh, you are an asshat Ron Aaron <rambamist@gmail.com> - 2016-04-04 13:07 +0300
                Re: Hugh, you are an asshat hughaguilar96@gmail.com - 2016-04-04 14:08 -0700
                Re: Hugh, you are an asshat Ron Aaron <rambamist@gmail.com> - 2016-04-05 07:31 +0300
                Re: Hugh, you are an asshat Bill Cummins <billc@cummins.net> - 2016-04-05 05:55 +0000
                Re: Hugh, you are an asshat Ron Aaron <rambamist@gmail.com> - 2016-04-05 11:12 +0300
                Re: Hugh, you are an asshat hughaguilar96@gmail.com - 2016-04-05 01:24 -0700
                Re: 4th.CoSy : Is your head small enough ? Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-04-04 10:16 +0000
                Re: 4th.CoSy : Is your head small enough ? hughaguilar96@gmail.com - 2016-04-04 04:26 -0700
        OT: Hugh changed to Israel and religion, was [Re: 4th.CoSy : Is your head small enough ?] Rod Pemberton <NoHaveNotOne@bcczxcfre.cmm> - 2016-04-02 12:03 -0400

csiph-web