OFFSET
0,13
COMMENTS
LINKS
Antti Karttunen, Alternative Catalan Orderings (with the complete Scheme source)
PROG
(Scheme-functions showing the essential idea. For the full source, follow the "Alternative Catalan Orderings" link.)
(define (A082858 n) (A080300 (parenthesization->binexp (GCSB (binexp->parenthesization (A014486 (A025581 n))) (binexp->parenthesization (A014486 (A002262 n)))))))
(define (GCSB t1 t2) (cond ((or (not (pair? t1)) (not (pair? t2))) (list)) (else (cons (GCSB (car t1) (car t2)) (GCSB (cdr t1) (cdr t2))))))
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Antti Karttunen, May 06 2003
STATUS
approved