bin1 := (2,4)(3,6)(5,7)(8,14)(9,16)(10,18)(11,20)(12,22)(13,24)(15,21)(17,23)
     (25,33)(26,35)(28,37)(29,38)(30,39)(32,34);