r3wp [groups: 83 posts: 189283]
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

World: r3wp

[All] except covered in other channels

Tomc
28-Feb-2005
[1436x5]
most likely the third fullmoon of the year  but there is a more complicated 
way of knowing ....
>> x: now/year
== 2005
>> x // 19
== 10
>> a: x // 19
== 10
>> b: x / 100
== 20.05
>> c: x // 100
== 5
>> d: b / 4
== 5.0125
>> e: b // 4
== 5.00000000000007E-2
>> f: (b + 8) / 24
== 1.16875
>> g: b - f + 1 / 3
== 6.62708333333333
>> h: 19 * a + b - d - g + 15 / 30
== 7.11368055555556
>> i: c / 4
== 1.25
>> k: c // 4
== 1
>> l: (32 + e + e + i + i - h - k) // 7
== 5.48631944444444
>> m: a + (11 * h) + (22 * l) / 451
== 0.463302691549642
>> month: h + l - (7 * m) + 114 / 31
== 3.9792542309404
>> day:  h + l - (7 * m) + 114 // 31
== 30.3568811591525
so according to that March 30 2005 should be easter (but it is not 
a sundy) prolly the 27th  then
couple of typos in there
easter?: func [ {given a year returns the date of easter.

    lifted from "Astronomical Formulae for Caculators" by Jean Meeus 
    1979
    algorithm attributed to a 1876 publication

    note: I am adding a + 1 to the day to accoung for appearent rounding 
    errors
    }
    x[integer!] "(Gregorian) year"
 /local a b c d e f g h i k l m n p
][  a: x // 19
	b: to integer! (x /  100) c: x // 100
	d: to integer! (b /  4)   e: b // 4
	f: to integer! (b + 8 / 25)
	g: to integer! (b - f + 1 / 3)
	h: 19 * a + b - d - g + 15 // 30
	i: to integer! (c / 4)     k: c // 4
	l: 32 + e + e + i + i - h - k // 7
	m: to integer! (11 * h + a + (22 * l) / 451)
	n: to integer! (h + l - (7 * m) + 114 /  31)
	p: h + l - (7 * m) + 114 // 31
	to date! reduce[x n p + 1]
]
DideC
28-Feb-2005
[1441]
As I ask all that to add this particular function to the Library, 
then, why does this function is not already on rebol.org ??
Tomc
28-Feb-2005
[1442x2]
I ahve a easier time maling the function than the library header
but we should all put more effort into our excelent library
Sunanda
28-Feb-2005
[1444]
If you upload a script without a Library header, one should be inserted 
automatically.....You just need to update it to have the right values.


Several people have claimed that it should be possible to get 99% 
of the right values by analysing the script automatically. So far, 
no one has demonstrated a header-writer. Maybe you could write one 
first!?
Tomc
28-Feb-2005
[1445]
beurocrocy is not one of my strong suits , but I will keep it in 
mind
Allen
28-Feb-2005
[1446]
I had an easter function in rebol.org years ago, I assume it is still 
there.
Tomc
28-Feb-2005
[1447]
[Search=easter] .... no items found in search.
Sunanda
28-Feb-2005
[1448]
Not as far as I can see.

For no explicable reason, not all scripts on the "old" library made 
it to the "new" one.

That was not a deliberate quality/triage choice -- just some somehow 
slipped the net.
Tomc
28-Feb-2005
[1449]
maybe the older library on rebol.com
Allen
28-Feb-2005
[1450]
http://web.archive.org/web/20000930190758/www.rebol.org/math/easter.html
Sunanda
28-Feb-2005
[1451]
I don't think it as ever in the REBOLtech Library -- whcih was the 
main starting point for the new Library:
http://www.reboltech.com/library/script-math.html
Which may be how it got overlooked.
Allen
28-Feb-2005
[1452]
here's the old rebol.org list, probably a few missed gems in there. 
http://web.archive.org/web/20021208011501/www.rebol.org/fl-list.html
Sunanda
28-Feb-2005
[1453x2]
Plus there were a load of unpublished scripts in the old REBOL.org......I'll 
just officially describe some of them as "weird".
If you've got the time to rescue your forgotten gems and release 
them via REBOL.org, we'd all benefit from that.
Allen
28-Feb-2005
[1455]
I'll wait for the for the next rebol release before picking through 
the time capsule, some of the old scripts were obsoleted with later 
built-in functions.
Sunanda
28-Feb-2005
[1456]
Good point ----- but it could be *years* :-)
BrianW
28-Feb-2005
[1457]
*whimper*
Tomc
28-Feb-2005
[1458]
heak has been yeaes
BrianW
28-Feb-2005
[1459x2]
From my perspective it's only been months, and even that is a little 
too long :-)
But I'm learning to cope ;-)
Tomc
28-Feb-2005
[1461]
to be fair there are alpha and beta updates
BrianW
28-Feb-2005
[1462x2]
True, loads of those
Where is the URL I can point folks to for learning about how to set 
up a Rebol3 account? I seem to have lost the bookmark for it.
Graham
28-Feb-2005
[1464x2]
http://www.altme.comand then logon to rebol3 with guest/guest
your docs say password is "pass" which is wrong from memory
BrianW
28-Feb-2005
[1466x2]
Thanks very much, I *thought* that was wrong
The correction has been made and uploaded.
[unknown: 9]
28-Feb-2005
[1468]
Brian, I have already sent a link to your site to several people. 
 They like it (they are none Rebol users).
BrianW
1-Mar-2005
[1469]
Reichart, thank you! Those are exactly the people I was writing for 
:-)
DideC
1-Mar-2005
[1470]
So to cut the discussion, I have added the Easter day function to 
the Library. It is the same as the TomC func a few lines up.
Micha
1-Mar-2005
[1471]
what this does not act ?

browse {javascript:window.open("", "mywindow","status=1,width=350,height=150")}
BrianW
1-Mar-2005
[1472]
I'm having fun writing the chapter on repetition structures, because 
I'm finally sneaking in some of the datatypes :-)
Colin
1-Mar-2005
[1473]
repetition structures .. iterative commands?
BrianW
1-Mar-2005
[1474x2]
loop, repeat, for. I'm not covering iterating through a list yet.
Well, I take a brief glance at iterating through a list in the last 
part of the chapter.
Anton
2-Mar-2005
[1476x2]
Micha,   sound/rate: sound/rate / 2    ; down one octave
But Rebol sound port is buggy.  At the moment I am working on a FMOD 
interface (www.fmod.org)
BrianW
2-Mar-2005
[1478]
heh. the rebol-unit author said that he wasn't maintaining it and 
I could do whatever I wanted with it as if that were a *bad* thing 
:-D
DideC
3-Mar-2005
[1479]
There is another Rebol Unit script call RUn. Now in v1.7
https://sourceforge.net/projects/rebol-unit/
BrianW
3-Mar-2005
[1480]
That's good. I'll probably keep playing with this one a bit, partly 
for the learning experience as much as anything else.
DideC
3-Mar-2005
[1481]
Run is done by RebolTof, Belgium developper, who works for Belgium's 
army.
So RUn was develop and is used in real case.


He has also done RAPId (Rebol API Documentor), a JavaDoc like Document 
generator for Rebol
 https://sourceforge.net/projects/rapid/


For the english doc, contact him directly [christophe-:-coussement-:-mil-:-be]
BrianW
3-Mar-2005
[1482x2]
Thanks for both of those links, DideC. I am very interested in taking 
a closer look at RAPId!
dumb question: is there a REBOL build with AGG available yet?
Ammon
3-Mar-2005
[1484x2]
www.REBOL.net
Look for alpha releases...