bin1 := (1,3,6,10,17,24)(2,4,7,12,20,29)(5,8,14)(9,15)(11,18,26,31,40,13)(16,22,
     32,42,52,61)(19,27,36,47,57,60)(21,30,39,50,59,49)(23,33,43)(25,35,46,56,
     41,51)(28,37)(34,44,54,58,63,62)(38,48)(45,55);