This is super cool indeed. Now I feel stupid. On Wed, Dec 4, 2019 at 2:56 PM Matthew Butterick <m...@mbtype.com> wrote:
> > On Dec 4, 2019, at 2:39 PM, 'Joel Dueck' via Racket Users < > racket-users@googlegroups.com> wrote: > > So it seems easy to match "*at least *N identical elements". > But is there a method for matching "*no more than *N identical elements"? > > > ? > > > #lang racket > (require rackunit) > > (define (super-cool? lst) > (match lst > [(and (list* _ ... a a _) > (not (list* _ ... a a a _))) #t] > [_ #f])) > > (check-true (super-cool? '(1 1 4))) > (check-false (super-cool? '(1 1 1 4))) > > -- > You received this message because you are subscribed to the Google Groups > "Racket Users" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to racket-users+unsubscr...@googlegroups.com. > To view this discussion on the web visit > https://groups.google.com/d/msgid/racket-users/1734093C-0C39-4289-9747-41CAFB35851F%40mbtype.com > <https://groups.google.com/d/msgid/racket-users/1734093C-0C39-4289-9747-41CAFB35851F%40mbtype.com?utm_medium=email&utm_source=footer> > . > -- You received this message because you are subscribed to the Google Groups "Racket Users" group. To unsubscribe from this group and stop receiving emails from it, send an email to racket-users+unsubscr...@googlegroups.com. To view this discussion on the web visit https://groups.google.com/d/msgid/racket-users/CADcuegu4s2bhEZNQ1fNt5JX-ENc91Ythaev7VezWk-ZY8Z2%2BcA%40mail.gmail.com.
