%I#8 2015年10月15日10:55:24

%S 0,1,3,2,8,7,4,5,6,22,21,20,17,18,9,10,11,12,14,15,16,19,64,63,62，

%电话58,59,61,57,54,45,46,55,48,49,50,23,24,25,26,27,28,29,30,31,32,33,34，

%U 35,36,37,38,39,40,41,42,43,44,47,51,52,53,56,60196195194189190美元

%N加泰罗尼亚双射gma082350作用于A014486/A063171编码的括号引起的自然数置换。

%C此加泰罗尼亚双射将二叉树向右旋转（如果可能），否则应用加泰罗尼亚双射A069768。

%H A.Karttunen，<A href=“网址：http://www.iki.fi/~kartturi/matikka/Nekomorphisms/gatomorf.htm“>Gatomorphisms（带有完整的Scheme源代码）

%H<a href=“/index/Per#IntegerPermutationCatAuto”>加泰罗尼亚语自同构诱导的signature-permutation的索引条目</a>

%o（在列表结构上实现此自同构的Scheme函数：）

%o（定义（gma082350！s）（条件（（对）（条件）（对（车））（机器人））（其他（gma069768！s））））

%o（定义（robr！s）（let（（ex-cdr（cdr s）））（set-cdr！s（caar s））（set-car！（car s）ex-cdr）（swap！（cars））

%o（定义（交换！s）（let（（ex-car（cars）））（set-car！s（cdr-s））（set-cdr！s ex-car）s））

%A082349的Y逆。另请参阅A074679-A074680、A082335-A082336。

%Y循环次数：A073193（待检查）。定点数量：A019590。（在该排列的范围[A014137（n-1）..A014138（n-1。

%K nonn公司

%0、3

%2003年4月17日，安蒂·卡图宁