{- |
We provide a way to specify a set of columns
that matches the tuple structure of a certain graph type.
-}moduleGraphics.Gnuplot.Value.ColumnSet(T(Cons),atom,pair,triple,quadruple,)whereimportqualifiedGraphics.Gnuplot.Value.AtomasAtomnewtypeTa=Cons[Int]atom::Atom.Ca=>Int->Taatomi=Cons[i]pair::Ta->Tb->T(a,b)pair(Consai)(Consbi)=Cons(ai++bi)triple::Ta->Tb->Tc->T(a,b,c)triple(Consai)(Consbi)(Consci)=Cons(ai++bi++ci)quadruple::Ta->Tb->Tc->Td->T(a,b,c,d)quadruple(Consai)(Consbi)(Consci)(Consdi)=Cons(ai++bi++ci++di)