OFFSET
0,3
LINKS
A. Karttunen, Gatomorphisms (with the complete Scheme source)
PROG
(Scheme functions implementing this automorphism on list-structures:)
(define (gma082342! s) (cond ((pair? s) (gma082342! (cdr s)) (gma072797! s) (gma082342! (car s)))) s)
CROSSREFS
Inverse of A082341. a(n) = A057163(A073284(A057163(n))). Occurs in A073200. Cf. also A072797, A082337-A082339.
KEYWORD
nonn
AUTHOR
Antti Karttunen, Apr 17 2003
STATUS
approved