( select )* . zip2 . (cshift,((mod)*)*.(zip2)*.zip2.(((+)*)*.(zip2)*.zip2.((iota)*.(#)*.cshift,(repeat)*.zip2.(repeat.(2π2,#.2π1)o,(#)*.cshift)o)o,(repeat)*.zip2.(id,id)o.(#)*.cshift)o)o