%I#5 2012年3月31日13:21:14

%S 0,1,2,3,5,4,6,7,8,13,12,9,10,11,14,15,16,17,18,19,20,21,22,36,35,31，

%电话：32,34,24,23,25,26,27,28,29,30,33,38,37,39,40,41,42,43,44,45,46,47,48，

%U 49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64106105101104

%加泰罗尼亚自同构的N签名置换：在列表顶层的第一个nil之后应用*A074686，如果有的话，否则保持结构不变。

%H A.Karttunen，<A href=“/A130376/b130376.txt”>n，A（n）表，n=0..2055</a>

%H<a href=“/index/Per#IntegerPermutationCatAuto”>加泰罗尼亚自同构的签名置换索引条目</a>

%o（此自同构的破坏性方案实现，作用于S表达式，即列表结构：）

%o（定义*A130376！（！APPLY-AFTER-FIRST-NIL*A074686！）

%o（定义（！APPLY-AFTER-FIRST-NIL f！）

%Y反向：A130375。a（n）=A130369（A074686（n））=A074685。

%K nonn公司

%O 0.3

%2007年6月5日，安蒂·卡图宁