HTML template, and JavaScript &c. are courtesy of upstream sources:
Brad Nelson |
Brad Nelson's SVFIG talks repository |
reveal.js by Hakim El Hattab |
impress.js by Bartek Szopka, Henrik Ingo |
Valid HTML
Wed 12 Oct 00:37:11 UTC 2022 Rev 000cak- highlight-b-kk Wed 12 Oct 00:30:14 UTC 2022 Rev 000caj- highlight-b-jj
(def lazy-fib
(concat
[0 1]
((fn rfib [a b]
(lazy-cons (+ a b) (rfib b (+ a b)))) 0 1)))
/*
* RUN-TIME FUNCTIONS FOR DEFINED WORDS
*/
void Fdocon (void * pfa) {
*--psp = *(unsigned int *)pfa;
}
void Fdovar (void * pfa) {
*--psp = *(unsigned int *)pfa; /* pf holds variable address */
}
void Fdorom (void * pfa) {
*--psp = (unsigned int)pfa;
}
void setup() {
Serial.begin(9600);
pinMode(LED_BUILTIN, OUTPUT);
}
void loop() {
bool state = digitalRead(LED_BUILTIN);
state = !state;
digitalWrite(LED_BUILTIN, state);
delay(300);
}
0 000 0 10 000 s 8 1100 000 d 16 0 001 r 1 10 001 m 9 1100 001 v 17
That's pretty much it. ;) -wa1tnr, October, 2022
Rev 000caj- highlight-b-jj Wed 12 Oct 00:30:14 UTC 2022