adamc@650: table t : {Id : int, A : string, B : float}
adamc@708:   PRIMARY KEY Id
adamc@650: 
adamc@782: open BatchFun.Make(struct
adamc@782:                        val tab = t
adamc@782:                        val title = "BatchG"
adamc@782:                        val cols = {A = BatchFun.string "A",
adamc@782:                                    B = BatchFun.float "B"}
adamc@782:                    end)