C++拥有序列,你不必双列,你可以每列

元<型名 F,整...I,类...T>
空 每一列(F&f,序列<I...>,T&...t){//总M
    f(拉<I>(前向<T>(t)...)...);
}//只能这样拉,目前不能(保存...)
元<整 K,整 M,型名 F,整...J,型名...T>
空 每列(F&f,序列<J...>,T&...t){
    (每一列(f,序乘加<K,M,J>(),前向<T>(t)...),...);
}//这是竖向,即每个元组的头,取来干活.
//J...表示一趟,M列,|||||,就J趟
元<整 M,型名 F,类...T>
空 每列(F&f,T&...t){//每一,t为元组
    静 常式 整 K=型长...(T);静断(K%M==0);
    每列<K,M>(f,转序<M>(),前向<T>(t)...);
}//每列干什么.f((A,B)[0]),搞个每行.
//每列中M表示多少个列,表示按列来搞f
空 测试(串&a,向量<串>&b){压(b,a);}
元<类...T>
空 啊(T&...t){//均为出序列.
    每列<3>(测试,前向<T>(t)...);
}//按几列执行.分成3份.
空 主(){
    串 a,b{"啊"},c{"哦"};
    向量<串>d,e,f;
    啊(a,b,c,d,e,f);打印大小(d,e,f);//
    打印列(d,e,f);//1,1,1
}

更多增强,需要能够手动生成编译包.如[...I]=1,2,3这种.
C++的...急需要扩展.
有了序列后,元组就是折腾.可以丢弃啦.