OFFSET
0,3
COMMENTS
See comments at A120705.
LINKS
A. Karttunen, Gatomorphisms <I>(With the complete Scheme source)</I>
PROG
(Scheme function implementing this automorphism on list-structures:)
(define (gma120706! s) (cond ((pair? s) (gma074679! s) (gma120706! (cdr s)) (cond ((pair? (car s)) (gma120706! (caar s)) (gma120705! (cdar s)))))) s)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Jun 28 2006
STATUS
approved