Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.lang.forth > #44782 > unrolled thread
| Started by | Chris Curl <ccurl609@gmail.com> |
|---|---|
| First post | 2016-01-12 07:47 -0800 |
| Last post | 2016-02-11 07:39 -0800 |
| Articles | 7 on this page of 127 — 28 participants |
Back to article view | Back to comp.lang.forth
Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 07:47 -0800
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-12 16:25 +0000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-12 10:45 -0600
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 08:46 -0800
Re: Ruby/Forth challenge for WJ rickman <gnuarm@gmail.com> - 2016-01-12 11:57 -0500
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 09:22 -0800
Re: Ruby/Forth challenge for WJ hughaguilar96@gmail.com - 2016-01-12 21:04 -0800
Re: Ruby/Forth challenge for WJ Ron Aaron <rambamist@gmail.com> - 2016-01-13 07:59 +0200
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-12 19:42 +0000
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-12 12:53 -0800
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-13 15:45 +0000
Re: Ruby/Forth challenge for WJ rickman <gnuarm@gmail.com> - 2016-01-13 13:44 -0500
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-13 11:39 -0800
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-14 05:01 +0100
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-14 12:28 +0000
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 09:50 -0800
Re: Ruby/Forth challenge for WJ Pablo Hugo Reda <pabloreda@gmail.com> - 2016-01-12 11:50 -0800
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 12:30 -0800
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 12:43 -0800
Re: Ruby/Forth challenge for WJ stephen@mpeforth.com (Stephen Pelc) - 2016-01-12 21:01 +0000
Re: Ruby/Forth challenge for WJ peter.m.falth@gmail.com - 2016-01-12 15:00 -0800
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-12 16:13 -0800
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-12 16:22 -0800
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-12 16:24 -0800
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-12 17:46 -0800
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-12 18:39 -0800
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-13 13:05 -0800
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-14 04:33 +0100
Re: Ruby/Forth challenge for WJ m.a.m.hendrix@tue.nl - 2016-01-14 03:27 -0800
Re: Ruby/Forth challenge for WJ peter.m.falth@gmail.com - 2016-01-14 04:42 -0800
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-14 13:03 +0000
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-13 21:17 -0800
Re: Ruby/Forth challenge for WJ hughaguilar96@gmail.com - 2016-01-13 21:44 -0800
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-14 10:57 +0000
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-14 12:20 -0800
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-14 13:57 -0800
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-14 14:22 -0800
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-14 16:14 -0800
Re: Ruby/Forth challenge for WJ Melzzzzz <mel@zzzzz.com> - 2016-01-15 03:05 +0100
Re: Ruby/Forth challenge for WJ Waldek Hebisch <hebisch@antispam.uni.wroc.pl> - 2016-01-15 00:41 +0000
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-15 16:22 +0000
Re: Ruby/Forth challenge for WJ mhx@iae.nl (Marcel Hendrix) - 2016-01-16 11:44 +0200
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-16 04:49 -0800
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-16 15:05 +0000
Re: Ruby/Forth challenge for WJ m.a.m.hendrix@tue.nl - 2016-01-18 03:26 -0800
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-18 12:48 +0000
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-19 22:26 +0100
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-20 03:05 -0800
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-20 21:00 +0100
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-20 15:57 -0800
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-21 23:02 +0100
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-22 01:25 +0000
Re: Ruby/Forth challenge for WJ hughaguilar96@gmail.com - 2016-01-21 18:05 -0800
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-21 22:03 -0800
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-20 13:40 +0000
Re: Ruby/Forth challenge for WJ m.a.m.hendrix@tue.nl - 2016-01-18 03:55 -0800
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-23 15:13 -0600
Re: Ruby/Forth challenge for WJ mhx@iae.nl - 2016-01-24 00:55 -0800
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-25 04:48 -0600
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-25 12:39 +0000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-25 08:05 -0600
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-25 16:40 +0000
Re: Ruby/Forth challenge for WJ Mark Wills <markwills1970@gmail.com> - 2016-01-25 04:44 -0800
Re: Ruby/Forth challenge for WJ stephen@mpeforth.com (Stephen Pelc) - 2016-01-25 14:01 +0000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-25 08:08 -0600
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-25 11:56 -0600
Re: Ruby/Forth challenge for WJ "Elizabeth D. Rather" <erather@forth.com> - 2016-01-25 11:12 -1000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-26 03:33 -0600
Re: Ruby/Forth challenge for WJ stephen@mpeforth.com (Stephen Pelc) - 2016-01-26 11:09 +0000
Re: Ruby/Forth challenge for WJ stephen@mpeforth.com (Stephen Pelc) - 2016-01-26 11:06 +0000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-26 07:45 -0600
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-26 16:46 +0000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-26 11:16 -0600
Object-oriented Forth (was: Ruby/Forth challenge for WJ) anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-27 14:13 +0000
Re: Object-oriented Forth Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-27 10:33 -0600
Re: Object-oriented Forth hughaguilar96@gmail.com - 2016-01-27 08:45 -0800
Re: Object-oriented Forth Chris Curl <ccurl609@gmail.com> - 2016-01-27 09:14 -0800
Re: Object-oriented Forth hughaguilar96@gmail.com - 2016-01-29 21:57 -0800
Re: Object-oriented Forth Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-30 10:58 +0000
Re: Object-oriented Forth Chris Curl <ccurl609@gmail.com> - 2016-01-30 09:38 -0800
Re: Object-oriented Forth Coos Haak <chforth@hccnet.nl> - 2016-01-30 20:39 +0100
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-26 15:56 +0100
Re: Ruby/Forth challenge for WJ stephen@mpeforth.com (Stephen Pelc) - 2016-01-26 20:46 +0000
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-25 22:27 +0100
Re: Ruby/Forth challenge for WJ Roelf Toxopeus <rt4all@notthis.hetnet.nl> - 2016-01-28 14:20 +0100
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-28 08:06 -0600
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-28 16:14 +0100
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-28 10:32 -0600
Re: Ruby/Forth challenge for WJ anton@mips.complang.tuwien.ac.at (Anton Ertl) - 2016-01-28 17:26 +0000
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-28 12:13 -0600
Re: Ruby/Forth challenge for WJ Albert van der Horst <albert@spenarnc.xs4all.nl> - 2016-01-29 11:07 +0000
Re: Ruby/Forth challenge for WJ Bernd Paysan <bernd.paysan@gmx.de> - 2016-01-29 21:18 +0100
Re: Ruby/Forth challenge for WJ Tessa Bonting <tessa.bonting@gmail.com> - 2016-01-16 06:24 -0800
Re: Ruby/Forth challenge for WJ Rod Pemberton <NoHaveNotOne@bcczxcfre.cmm> - 2016-01-13 05:21 -0500
Re: Ruby/Forth challenge for WJ Rod Pemberton <NoHaveNotOne@bcczxcfre.cmm> - 2016-01-13 05:36 -0500
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-13 10:33 -0800
Re: Ruby/Forth challenge for WJ Rod Pemberton <NoHaveNotOne@bcczxcfre.cmm> - 2016-01-14 01:37 -0500
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 13:45 -0800
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 13:55 -0800
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-12 14:34 -0800
Re: Ruby/Forth challenge for WJ rickman <gnuarm@gmail.com> - 2016-01-12 19:00 -0500
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 16:49 -0800
Re: Ruby/Forth challenge for WJ rickman <gnuarm@gmail.com> - 2016-01-12 22:18 -0500
Re: Ruby/Forth challenge for WJ hughaguilar96@gmail.com - 2016-01-12 14:31 -0800
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-12 16:05 -0800
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-01-13 07:58 +0000
Re: Ruby/Forth challenge for WJ Rod Pemberton <NoHaveNotOne@bcczxcfre.cmm> - 2016-01-13 05:17 -0500
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-13 12:36 -0800
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-13 12:53 -0800
Re: Ruby/Forth challenge for WJ Andrew Haley <andrew29@littlepinkcloud.invalid> - 2016-01-14 06:50 -0600
Re: Ruby/Forth challenge for WJ Julian Fondren <julian.fondren@gmail.com> - 2016-01-13 05:36 -0800
Re: Ruby/Forth challenge for WJ lehs <skydda.barnen@gmail.com> - 2016-01-13 11:59 -0800
Re: Ruby/Forth challenge for WJ Chris Curl <ccurl609@gmail.com> - 2016-01-21 21:08 -0800
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-02-09 13:36 +0000
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-02-09 13:48 +0000
Re: Ruby/Forth challenge for WJ hughaguilar96@gmail.com - 2016-02-09 12:02 -0800
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-02-09 13:58 +0000
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-02-09 14:30 +0000
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-02-14 15:35 +0000
Re: Ruby/Forth challenge for WJ franck.bensusan@gmail.com - 2016-02-14 08:50 -0800
Re: Ruby/Forth challenge for WJ Julian Fondren <julian.fondren@gmail.com> - 2016-02-14 20:09 -0800
Re: Ruby/Forth challenge for WJ hughaguilar96@gmail.com - 2016-02-15 08:52 -0800
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-02-14 21:31 +0000
Re: Ruby/Forth challenge for WJ "WJ" <w_a_x_man@yahoo.com> - 2016-01-14 22:49 +0000
Re: Ruby/Forth challenge for WJ Paul Rubin <no.email@nospam.invalid> - 2016-01-14 15:31 -0800
Re: Ruby/Forth challenge for WJ Melzzzzz <mel@zzzzz.com> - 2016-01-15 06:55 +0100
Re: Ruby/Forth challenge for WJ djc <ciesinger@gmx.net> - 2016-02-11 07:39 -0800
Page 7 of 7 — ← Prev page 1 2 3 4 5 6 [7]
| From | Julian Fondren <julian.fondren@gmail.com> |
|---|---|
| Date | 2016-02-14 20:09 -0800 |
| Message-ID | <21233ff0-fd0a-4464-967e-e7bdbda8c15a@googlegroups.com> |
| In reply to | #45523 |
On Sunday, February 14, 2016 at 10:50:39 AM UTC-6, franck....@gmail.com wrote: > Le dimanche 14 février 2016 16:38:04 UTC+1, WJ a écrit : > > WJ wrote: > > > > Oforth version V0.9.23.1: > > > > ["one",2,"three","four",5] sortBy(#isString) groupWith(#isString) . > > ===> > > [[5, 2], [four, one, three]] ok > > > > -- > > I do know that Jews are G-d's Chosen People (we say that in Kiddush every > > Friday nite). Does that make us different from Gentiles? Clearly. If that's a > > problem, deal with it. > > https://web.archive.org/web/20101020044210/http://www.jpost.com/JewishWorld/JewishNews/Article.aspx?id=191782 > > Let's make it clear about Oforth. Oforth choices (GC, memory, ...) makes > it not suitable for lots of usages (embedded targets, ...). > So there are lots of areas where standard Forth is much more suitable and it > is really stupid that you use Oforth to denigrate it. If the answer to every post of WJ's were just "yeah, that's much better than Forth, but it won't work on embedded platforms", I doubt he'd post much. Especially if, when rPI and friends were brought up, people would agree that you can now use better languages than Forth for many projects. And if that EuroForth paper had concluded that it was much better to put a graphical UI together in Python than in Forth, for example. > Also, I feel very sad and chocked each time I see your posts, especially when > you mix Oforth code with your awful and brainless signatures. > > You seem to have big problems and whatever I can say, > you will probably keep on with your horrible messages. > At least, please stop using Oforth from now on. > > Franck Add a prohibition to your license. "The user may not quote Jewish newspapers." -- Julian
[toc] | [prev] | [next] | [standalone]
| From | hughaguilar96@gmail.com |
|---|---|
| Date | 2016-02-15 08:52 -0800 |
| Message-ID | <e0875669-b6fa-496e-a460-abb8b6b0c62a@googlegroups.com> |
| In reply to | #45538 |
On Sunday, February 14, 2016 at 9:09:31 PM UTC-7, Julian Fondren wrote: > On Sunday, February 14, 2016 at 10:50:39 AM UTC-6, franck....@gmail.com wrote: > > Le dimanche 14 février 2016 16:38:04 UTC+1, WJ a écrit : > > > WJ wrote: > > > > > > Oforth version V0.9.23.1: > > > > > > ["one",2,"three","four",5] sortBy(#isString) groupWith(#isString) . > > > ===> > > > [[5, 2], [four, one, three]] ok > > > > > > -- > > > I do know that Jews are G-d's Chosen People (we say that in Kiddush every > > > Friday nite). Does that make us different from Gentiles? Clearly. If that's a > > > problem, deal with it. > > > https://web.archive.org/web/20101020044210/http://www.jpost.com/JewishWorld/JewishNews/Article.aspx?id=191782 > > > > Let's make it clear about Oforth. Oforth choices (GC, memory, ...) makes > > it not suitable for lots of usages (embedded targets, ...). > > So there are lots of areas where standard Forth is much more suitable and it > > is really stupid that you use Oforth to denigrate it. > > If the answer to every post of WJ's were just "yeah, that's much better > than Forth, but it won't work on embedded platforms", I doubt he'd post > much. Especially if, when rPI and friends were brought up, people > would agree that you can now use better languages than Forth for many > projects. And if that EuroForth paper had concluded that it was much > better to put a graphical UI together in Python than in Forth, for > example. I have a lot of respect for Franck because he doesn't embrace anybody who supports oForth, but he has standards for who he wants as associates. This is as compared to Elizabeth Rather and Bernd Paysan who embraced John Passaniti because he supported ANS-Forth and Forth-200x, and allowed him to use comp.lang.forth as a platform for his nastiness comparable to WJ's nastiness. Also, the rPI etc. aren't really any good for micro-controllers. They are just miniature desktop-computers. My experience with using Forth in the real world was the MiniForth processor for which I wrote the MFX development system. The MiniForth was used as the motion-control board for a laser etcher. It had to be very fast because the laser has to move at a constant rate whether it is going straight or making an intricate pattern, because it burns blotches in the material if it slows down or hesitates. This was 20 years ago --- the rPI isn't capable of this today --- no Linux computer will ever be capable of this no matter how powerful the processor is, because Linux is not hard real-time. The best that the rPI etc. will be capable of, is soft real-time with very liberal time constraints (measured in milliseconds rather than microseconds). I don't think it is realistic to say that oForth is "better" or "worse" than Forth, because this is comparing apples and oranges. I do think that it is reasonable to say that oForth is "better" than Ruby or Python based on raw speed, although if you compare the number of code libraries available then Ruby and (especially) Python are better than oForth --- for the most part, languages such as this are chosen based on what code-libraries are available, because the users are mostly writing scripts based on code-libraries rather than writing programs from scratch --- but, given time, oForth may gain popularity and acquire an increasing number of code libraries (I may even write some code libraries for oForth, although my basic laziness is holding me back right now). I still think that my LowDraw program would make an interesting benchmark for speed. This is an example of a Forth program that was written for desktop computers and which would typically be written in a language such as oForth or Factor. The slide-rule program is a similar example --- I originally started this in Factor, but I was already losing interest in Factor, so I switched to ANS-Forth. Switching to ANS-Forth was a major hassle though because I lacked pretty much every kind of support that I needed --- the novice-package was actually written originally to provide me with the needed support to write the slide-rule program, and then I released it on its own because this kind of support would be needed for almost any program that anybody would write. > > > Also, I feel very sad and [shocked] each time I see your posts, especially when > > you mix Oforth code with your awful and brainless signatures. > > > > You seem to have big problems and whatever I can say, > > you will probably keep on with your horrible messages. > > At least, please stop using Oforth from now on. > > > > Franck > > Add a prohibition to your license. "The user may not quote Jewish > newspapers." What is offensive about the Jews is their claim to be "God's Chosen People" (all words capitalized). So long as they continue to make this claim, they will continue to offend pretty much everybody. Similarly, I find Elizabeth Rather's claim that ANS-Forth is the Standard (capitalized) to be offensive. She endlessly trumpets the fact that Charles Moore taught her Forth way back in the 1970s --- so she is Charles's Moore's Chosen Person (woo hoo!) --- in general, I find it offensive whenever anybody starts a conversation by declaring themselves to be the world's expert and everybody else to be a plebian who should be grateful for the opportunity to kneel in front of them and learn. The solution, as Julien said, is to just ignore the Jews. Don't read Jewish newspapers if you are a goy, because you will be offended --- duh! Similarly, all Forth programmers should just ignore ANS-Forth because you are by definition non-standard and worthless if you write any code that isn't approved by the ANS-Forth committee (my MFX being a prime example).
[toc] | [prev] | [next] | [standalone]
| From | "WJ" <w_a_x_man@yahoo.com> |
|---|---|
| Date | 2016-02-14 21:31 +0000 |
| Message-ID | <n9qroa$5jj$1@dont-email.me> |
| In reply to | #44817 |
WJ wrote:
> When did England adopt the Gregorian calendar?
>
> require 'date'
> Date.new(1700,1).upto(Date.new 1799,12,31).find{|d| d.england.gregorian?}.to_s
> ===>
> "1752-09-14"
Shorter:
require 'date'
d=Date.new(1700); d+=1 until d.england.gregorian?; d.to_s
===>
"1752-09-14"
--
Goyim were born only to serve us. Without that, they have no place in the
world---only to serve the People of Israel.... Why are gentiles needed? They
will work, they will plow, they will reap. We will sit like an effendi and eat.
That is why gentiles were created. -- Rabbi Ovadia Yosef
https://web.archive.org/web/20101020044210/http://www.jpost.com/JewishWorld/JewishNews/Article.aspx?id=191782
[toc] | [prev] | [next] | [standalone]
| From | "WJ" <w_a_x_man@yahoo.com> |
|---|---|
| Date | 2016-01-14 22:49 +0000 |
| Message-ID | <n798ma$rj2$1@dont-email.me> |
| In reply to | #44782 |
Chris Curl wrote:
> So, Ruby is so powerful, and Forth is a toy language. Let's see how fast Ruby can do this:
>
> 1. Allocate 256MB ram and fill it with random binary data.
> 2. Collect and print out the distribution of byte values in all 256MB bytes from #1.
>
> Forthers, how fast can your Forth do it?
>
> Any bets on which will be faster?
Here's an OCaml version:
(* Compile with
ocamlopt bigarray.cmxa random_bytes.ml
*)
open Bigarray ;;
open Printf ;;
let size = 99_000_000 ;;
let byte_ary = Array1.create int8_unsigned c_layout size ;;
let counts = Array.make 256 0 ;;
let start_time = Sys.time () in
for i = 0 to size - 1 do
Array1.set byte_ary i (Random.int 256)
done ;
printf "Array filled in %.3f seconds.\n" (Sys.time() -. start_time);;
let start_time = Sys.time () in
for i = 0 to size - 1 do
let j = Array1.unsafe_get byte_ary i in
counts.(j) <- counts.(j) + 1
done ;
printf "Bytes counted in %.3f seconds.\n" (Sys.time() -. start_time);;
Array.iteri
(fun i n ->
if (i mod 5) == 0 then print_newline () ;
printf "%3d : %-7d " i n)
counts ;;
printf "\n\nNumber of bytes counted: %d\n" (Array.fold_left (+) 0 counts) ;;
==== Output: (on an old winXP computer) ====
Array filled in 2.953 seconds.
Bytes counted in 0.266 seconds.
0 : 385830 1 : 385816 2 : 386439 3 : 386382 4 : 386738
5 : 385919 6 : 386066 7 : 386306 8 : 386956 9 : 388274
10 : 387042 11 : 385791 12 : 386712 13 : 386551 14 : 387666
15 : 386510 16 : 385620 17 : 386221 18 : 386245 19 : 385263
20 : 386859 21 : 387484 22 : 386390 23 : 387475 24 : 387023
25 : 386202 26 : 386844 27 : 385972 28 : 386602 29 : 387420
30 : 387564 31 : 387006 32 : 386446 33 : 386956 34 : 386473
35 : 386618 36 : 386379 37 : 385037 38 : 386714 39 : 387248
40 : 387217 41 : 386418 42 : 386818 43 : 386622 44 : 387180
45 : 386575 46 : 386546 47 : 387235 48 : 386865 49 : 386628
50 : 386397 51 : 387574 52 : 386129 53 : 386794 54 : 385637
55 : 386535 56 : 386403 57 : 386285 58 : 386937 59 : 386320
60 : 385337 61 : 386816 62 : 386694 63 : 386503 64 : 386673
65 : 386670 66 : 388015 67 : 387121 68 : 387023 69 : 386044
70 : 385404 71 : 386501 72 : 387071 73 : 386691 74 : 386887
75 : 386230 76 : 387611 77 : 387999 78 : 387165 79 : 385705
80 : 387316 81 : 387585 82 : 387107 83 : 385874 84 : 387276
85 : 386835 86 : 386149 87 : 387076 88 : 388193 89 : 387593
90 : 386422 91 : 386851 92 : 386612 93 : 387355 94 : 387588
95 : 387614 96 : 385305 97 : 386941 98 : 386394 99 : 386726
100 : 386811 101 : 387408 102 : 386767 103 : 386895 104 : 388382
105 : 386804 106 : 387353 107 : 386755 108 : 387150 109 : 387412
110 : 385633 111 : 387347 112 : 386838 113 : 387170 114 : 386361
115 : 386638 116 : 387057 117 : 386081 118 : 385832 119 : 386740
120 : 387757 121 : 387451 122 : 387098 123 : 386766 124 : 386363
125 : 386977 126 : 386405 127 : 386577 128 : 386927 129 : 386589
130 : 387189 131 : 386474 132 : 386847 133 : 386688 134 : 386244
135 : 387275 136 : 386456 137 : 386027 138 : 386732 139 : 387555
140 : 385865 141 : 386866 142 : 386641 143 : 387422 144 : 386862
145 : 387685 146 : 387207 147 : 386478 148 : 386946 149 : 386913
150 : 386451 151 : 387377 152 : 387188 153 : 386499 154 : 386113
155 : 387993 156 : 387431 157 : 386332 158 : 386921 159 : 386869
160 : 385660 161 : 386619 162 : 385974 163 : 387382 164 : 386220
165 : 386039 166 : 386322 167 : 385571 168 : 386361 169 : 386431
170 : 387085 171 : 387163 172 : 386347 173 : 386672 174 : 386089
175 : 386446 176 : 385938 177 : 386122 178 : 386418 179 : 387171
180 : 386732 181 : 387302 182 : 385205 183 : 387138 184 : 387568
185 : 387246 186 : 386654 187 : 386632 188 : 385658 189 : 387379
190 : 387645 191 : 386277 192 : 387486 193 : 387383 194 : 386587
195 : 385578 196 : 386661 197 : 386918 198 : 386927 199 : 386911
200 : 386286 201 : 386703 202 : 386480 203 : 386904 204 : 386434
205 : 386406 206 : 387257 207 : 385980 208 : 387014 209 : 386427
210 : 386633 211 : 387277 212 : 386182 213 : 387515 214 : 386755
215 : 387158 216 : 387182 217 : 386359 218 : 386064 219 : 385942
220 : 387245 221 : 386731 222 : 387630 223 : 386764 224 : 386327
225 : 386886 226 : 387878 227 : 387177 228 : 387687 229 : 385964
230 : 388119 231 : 385252 232 : 386767 233 : 386410 234 : 385813
235 : 386044 236 : 387082 237 : 386804 238 : 387111 239 : 387420
240 : 386756 241 : 386496 242 : 386016 243 : 386689 244 : 386454
245 : 386880 246 : 386957 247 : 386151 248 : 386162 249 : 385825
250 : 386764 251 : 386186 252 : 386924 253 : 387127 254 : 386762
255 : 386829
Number of bytes counted: 99000000
--
Amazon bans book. After nearly a month on the site, all traces of the book and
its 80 reviews have been removed.
http://jamesfetzer.blogspot.com/2015/11/debunking-sandy-hook-debunkers-5.html
https://www.youtube.com/watch?v=EEl_1HWFRfo
[toc] | [prev] | [next] | [standalone]
| From | Paul Rubin <no.email@nospam.invalid> |
|---|---|
| Date | 2016-01-14 15:31 -0800 |
| Message-ID | <87io2vu49p.fsf@nightsong.com> |
| In reply to | #44881 |
"WJ" <w_a_x_man@yahoo.com> writes:
> Here's an OCaml version... let size = 99_000_000 ;; ...
> ==== Output: (on an old winXP computer) ====
> Array filled in 2.953 seconds.
> Bytes counted in 0.266 seconds.
On i7-3770:
Array filled in 3.808 seconds.
Bytes counted in 0.220 seconds.
With size changed to 256MiB:
Array filled in 10.321 seconds.
Bytes counted in 0.596 seconds.
What is going on here? The i7 should be way faster than an
XP-generation machine. What cpu does the XP machine have?
Anyway, the speed is pretty good. I might try using ocaml.
[toc] | [prev] | [next] | [standalone]
| From | Melzzzzz <mel@zzzzz.com> |
|---|---|
| Date | 2016-01-15 06:55 +0100 |
| Message-ID | <20160115065500.3d7bc73c@maxa-pc> |
| In reply to | #44882 |
On Thu, 14 Jan 2016 15:31:46 -0800
Paul Rubin <no.email@nospam.invalid> wrote:
> "WJ" <w_a_x_man@yahoo.com> writes:
> > Here's an OCaml version... let size = 99_000_000 ;; ...
> > ==== Output: (on an old winXP computer) ====
> > Array filled in 2.953 seconds.
> > Bytes counted in 0.266 seconds.
>
> On i7-3770:
> Array filled in 3.808 seconds.
> Bytes counted in 0.220 seconds.
>
> With size changed to 256MiB:
> Array filled in 10.321 seconds.
> Bytes counted in 0.596 seconds.
>
> What is going on here? The i7 should be way faster than an
> XP-generation machine. What cpu does the XP machine have?
>
> Anyway, the speed is pretty good. I might try using ocaml.
On i7-4790:
Array filled in 1.940 seconds.
Bytes counted in 0.133 seconds.
256MiB:
Array filled in 5.247 seconds.
Bytes counted in 0.363 seconds.
Haskell version is somewhat faster:
length: 268435456
init time: 5.106665
count time: 0.253333
import System.CPUTime
import qualified Data.Vector.Unboxed as U
import qualified Data.Vector.Unboxed.Mutable as UM
import System.Random.Mersenne
import Data.Word
import Text.Printf
main = do
g <- newMTGen Nothing
rs <- randoms g
let a = U.fromList (take (2^28) rs) :: U.Vector Word8
diff b e = (fromIntegral (e - b)) / (10^12)
begin <- getCPUTime
putStrLn $ "length: " ++ show (U.length a) -- to force calculation
end <- getCPUTime
putStrLn $ "init time: " ++ show (diff begin end)
begin' <- getCPUTime
table <- UM.new 256 :: IO (UM.IOVector Int)
U.mapM_ (\x -> do let x' = fromIntegral x
v <- UM.unsafeRead table x'
UM.unsafeWrite table x' (v+1)) a
end' <- getCPUTime
putStrLn $ "count time: " ++ show (diff begin' end')
out <- U.unsafeFreeze table
let out' = zip [0..] $ U.toList out
wlist = foldl
(\x (a,b)-> if a `mod` 5 > 0
then printf "%s %3d : %-7d" x (a::Int) (b::Int)
else printf "%s\n%3d : %-7d" x (a::Int) (b::Int)) "" out'
max = foldl (\(a,b) (c,d)-> if b > d then (a,b) else (c,d))
(head out') (tail out')
putStrLn $ wlist++"\nmaximum: " ++ show max
[toc] | [prev] | [next] | [standalone]
| From | djc <ciesinger@gmx.net> |
|---|---|
| Date | 2016-02-11 07:39 -0800 |
| Message-ID | <cc5f4c98-9f0c-4c92-8c0d-96737c151550@googlegroups.com> |
| In reply to | #44782 |
Am Dienstag, 12. Januar 2016 16:47:09 UTC+1 schrieb Chris Curl: > 1. Allocate 256MB ram and fill it with random binary data. > 2. Collect and print out the distribution of byte values in all 256MB bytes from #1. This is not a task where Ruby would shine, right? I have used Ruby and remember that it has some nice tricks up its sleeve, like lambdas and closures. It also has an interesting approach at OO. None of this is needed for the random numbers here. Sounds like the printing will be the bottleneck anyhow ;-) Daniel
[toc] | [prev] | [standalone]
Page 7 of 7 — ← Prev page 1 2 3 4 5 6 [7]
Back to top | Article view | comp.lang.forth
csiph-web