method virtual elts_columns :  (string * ('a -> string)) list